Select Code to Download

 

#!/usr/bin/perl -w
...
  my ($stdout,$stderr,$exit) = $ssh->cmd("$one") ;
  print $stdout;
}

suse@linux-p9uj:~/junk/vm> ./vmain.pl 
anaconda-ks.cfg
...
--- 8.8.8.8 ping statistics ---
3 packets transmitted, 3 received, 0% packet loss, time 2003ms
rtt min/avg/max/mdev = 52.113/129.706/211.260/65.033 ms