Select Code to Download

#!/usr/bin/perl

...
print "End of pass.\n";
print "\n";
}

......
print "End of pass.\n";
...

$AH{'SS'}{$INFO}{'POINTER'}->close();
}