Select Code to Download

my $fh;
if(my $filename = shift)
...
}

print $fh "Where do you want to go today?\n";