Select Code to Download

use Getopt::Std;
...
} else {
print "option e not used!\n";
}

use Getopt::Long;

...
print "File is $opt{file}!\n";
}