Do we expect $1 set after concatted regex match?

$ perl -wE'"x".q{abc} =~ m/xab/ and say "OK"'
OK
$ perl -wE'"x".q{abc} =~ m/(xa)b/ and say "OK"'
OK
$ perl -wE'"x".q{abc} =~ m/(xa)b/ and say $1'
Use of uninitialized value $1 in say at -e line 1.

$ perl -wE'q{xabc} =~ m/xab/ and say "OK"'
OK
$ perl -wE'q{xabc} =~ m/(xa)b/ and say "OK"'
OK
$ perl -wE'q{xabc} =~ m/(xa)b/ and say $1'
xa


-- 
H.Merijn Brand  http://tux.nl   Perl Monger  http://amsterdam.pm.org/
using perl5.00307 .. 5.17   porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/        http://www.test-smoke.org/
http://qa.perl.org   http://www.goldmark.org/jeff/stupid-disclaimers/

• Do we expect $1 set after concatted regex match? by H.Merijn Brand
• Re: Do we expect $1 set after concatted regex match? by demerphq