Select Code to Download

use strict;
use warnings;
...
my %args = @ARGV;

print "Infile: $args{-infile}\n", "Outfile: $args{-outfile}" if ( exis
+ts $args{-infile} && exists $args{-outfile} );