[perl #58608] Data::Dumper and slashes within qr

Todo test based on this message is available in
git://github.com/chorny/perl.git repository, branch data-dumper.


On Fri Sep 05 09:39:16 2008, tinita wrote:
> I get this with perl 5.8.8, and it's also producing the same result in
> bleadperl and 5.10.
> 
> 
> perl -wle'
> my $q = q| \/ |;
> use Data::Dumper;
> my $qr = qr{$q};
> print $qr;
> print Dumper $qr;
> eval Dumper $qr;
> print $@'
> (?-xism: \/ )
> $VAR1 = qr/(?-xism: \\/ )/;
> 
> Unmatched ( in regex; marked by <-- HERE in m/( <-- HERE ?-xism: \\/
>    at (eval 1) line 1.

-- 
Alexandr Ciornii, http://chorny.net

• [perl #58608] Data::Dumper and slashes within qr by Alexandr Ciornii via RT