nayakgi / perl-compiler

Automatically exported from code.google.com/p/perl-compiler
Other
0 stars 0 forks source link

cannot undef $@ when using re 'eval' #332

Open GoogleCodeExporter opened 9 years ago

GoogleCodeExporter commented 9 years ago
What steps will reproduce the problem?

> perlcc -r -e 'use re "eval"; our ( $x, $y, $z ) = 1..3; $x =~ qr/$x(?{ $y = 
$z++ })/; undef $@; print "ok\n"'
Modification of a read-only value attempted at (re_eval 1) line 1.

What is the expected output? What do you see instead?

> perl -e 'use re "eval"; our ( $x, $y, $z ) = 1..3; $x =~ qr/$x(?{ $y = $z++ 
})/; undef $@; print "ok\n"'
ok

Please use labels and text to provide additional information.

Original issue reported on code.google.com by nicolas....@gmail.com on 9 May 2014 at 10:14