Select Code to Download

use strict;
my $data_file = $ARGV[0]; #input file
...

print "line count: $count\n";
print ("\n\nCompleted.\n\n");