Select Code to Download

#!/usr/bin/perl

...
END { print "1st END\n" }
END { print "2nd END\n" }
END { print "\n" }

# begin output - this line not really printed by code above
1st BEGIN
...
2nd END
1st END
# end output - this line not really printed by code above