Select Code to Download

if($input eq "-c"){
    print "Enter Command: ";
...
    print $fh "\t#### END COMMAND OUTPUT ####\n";
    next;
}

#!/bin/bash

perl /path/to/script/script.pl $1 $2 $3 $4