Select Code to Download

use strict;
my $filename = 'my_textfile.txt';
...

print "Processing $_"
    for @ARGV;

use strict;
use File::Find;
...

print "Processing $_"
    for @ARGV;

use strict;
use File::DosGlob qw(bsd_glob); # to get sane whitespace semantics
...

print "Processing $_"
    for @ARGV;