Select Code to Download

foreach my $filename (@ARGV) {
    open(MYFILE, $filename) 
...
    print "$filename is executable!\n" if -x MYFILE;
    print "$filename exists!\n" if -e MYFILE;
}