Help for this page

Select Code to Download


  1. or download this
    if ( $sshconn = Net::SSH::Perl->new("localhost", %params) )
{
...

$sshconn->cmd("exit");
}
  2. or download this
    print(STDERR "TAR START...\n");
system("tar -cmvzf /tmp/large.tgz /tmp/largedir");
print(STDERR "TAR END.\n");