Select Code to Download

#!/usr/bin/perl
STDOUT; # '???';
...
{ *BEING = BEGIN } # { *BEING = 'BEGIN'; }
{ END } # {sub END ; ;};
STDERR; # '???';

#!/usr/bin/perl
{ # {
...
    } # } ;
} # }
{ *BEING = BEGIN } # { *BEING = 'BEGIN'; }

#!/usr/bin/perl
{ # {
...
        } # }
    } # } ;
} # }

        BEGIN { # sub BEGIN {
            $SUB = sub { # $SUB = sub {
...
    sub ::END { print " " } # sub END { print ' '; }

    END { print "hacker," } # sub END { print 'hacker,'; }