Select Code to Download

$ /usr/local/bin/perl -v
This is perl 5, version 12, subversion 1 (v5.12.1) built for x86_64-li
+nux-ld

$ /usr/local/bin/perl -e '@ARGV = qw(foo);
foo(@ARGV);
sub foo {
...
    my $y = shift;
}'
panic: attempt to copy freed scalar 13280e0 to 133a630 at -e line 5.