Select Code to Download

my $namesFileName = shift; # Get name of the file names file from comm
+and line

...
chomp @filenames; # Remove the line end character from each entry

...

use strict;
use warnings;
...
}

close $inNames;