Select Code to Download

#!/usr/bin/perl -w

...
close $FH;
print "\nSUCCESS!\n\n";
exit;

<SCRIPT>
<!--
...
HTML = 0;
-->
</SCRIPT>