Select Code to Download

my $processfilename=''; 
print "\nEnter filename to process (type exit to quit): "; 
chomp ($processfilename = <STDIN>);

my $processfilename=$ARGV[0];