Select Code to Download

    my $ssh = "/usr/local/bin/ssh";
    my @ssh_cmd_to_run=($ssh, "-i", $key_file, "user\@$host", "scriptn
+ame", "options");
...
    close(SSH_OUT);
    my @error=<ERROR>;
    close(ERROR);

#!/usr/bin/perl -wT
#
...
    print "Error: Unknown command or incorrect format \"$ssh_command\"
+\n";
    return;
}