Select Code to Download

#!perl -w

# sigeval.pl
...
    print "ERROR:$@" if $@;
    print "\n";
}

#!/usr/bin/perl
use Modern::Perl qw/2010/;
use Safe;
...


eval ('perl -MO=Deparse obfu3.pl');