http://www.perlmonks.org?node_id=909256


in reply to Re^4: Error: Use of uninitialized value $item in concatenation (.) or string at...
in thread Error: Use of uninitialized value $item in concatenation (.) or string at...

One thing you will get good at is testing your ideas. Sometimes reading the documentation or posts here give you ideas, but you will not be certain about them until you try them. Try this:

use strict; use warnings; my $text = 'axa bxb cxc dxd'; print "1 - \$1 = $1, \$2 = $2\n"; $text =~ m/(a\w*) (b\w*)/; print "2 - \$1 = $1, \$2 = $2\n"; my $x = $2; print "3 - \$1 = $1, \$2 = $2\n"; $x =~ s/,//g; print "4 - \$1 = $1, \$2 = $2\n"; $x =~ s/x//g; print "5 - \$1 = $1, \$2 = $2\n";