Select Code to Download

Signal SEGV at (reeval 422)[pm.890409.pl:30] line 1

>> (eval 334)[C:/perl/site/5.10.1/lib/MSWin32-x86-multi-thread/Class/M
+OP/Method/Generated.pm:53]:1: sub {exists $_[0]->{"actual_body"}}
>> C:/perl/site/5.10.1/lib/MSWin32-x86-multi-thread/Class/MOP/Method/W
+rapped.pm:48:             return $around->{cache}->(@_);
...
>> C:/perl/5.10.1/lib/MSWin32-x86-multi-thread/Data/Dumper.pm:99:     
+$s->{sep} = "\n";
>> C:/perl/5.10.1/lib/MSWin32-x86-multi-thread/Data/Dumper.pm:101:   r
+eturn bless($s, $c);
>> generated method (unknown origin):30: >> (reeval 421)[pm.890409.pl:
+30]:1: >> (reeval 421)[pm.890409.pl:30]:2: >> (reeval 418)[pm.890409.
+pl:30]:2: >> C:/perl/site/5.10.1/lib/Regexp/Grammars.pm:556:     my (
+$stack_ref, $key, $original_name, $value) = @_;