Select Code to Download

#!/usr/bin/perl
 
...
    print "File Name: $file 5 seconds til next.\n\n";
    sleep 5;
}

#!/usr/bin/perl
use strict;
...

   print while <$fh>;
}