$code = <<'CODE';
END {print '# post-hacked #';}
print "Hello World!\n";
CODE