Select Code to Download

$ perl -MO=Deparse '-M5;print "Hello"' -e 'print "World"'
sub BEGIN {
...
}
print 'Hello';
print 'World';