Select Code to Download

#!/usr/bin/env perl
use warnings;
...
    print "<$resp>\n";
}
print "Goodbye.\n";

#!/usr/bin/env perl
use warnings;
...
waitpid($pid, 0);
$ssh->disconnect;
print "Done.\n";