Select Code to Download

#Print useage info
sub useage {
...

# Get our options from the commandline; print options if not correct
&usage if not (GetOptions('pass=s' => \$pass, 'user=s' => \$user, 'con
+fig=s' => \$config_file));