if($input eq "-c"){ print "Enter Command: "; my $cmd = ; print $fh $cmd; print $fh "\n\t#### START COMMAND OUTPUT ####\n"; print `bash -c -i "$cmd"`; foreach(`bash -c -i "$cmd"`){ print $fh "#".$_; } print $fh "\t#### END COMMAND OUTPUT ####\n"; next; }