Select Code to Download

#! perl --
use strict;
...
close $MY or die "Not completed $dtp_my\n";
close $ALL;