Help for this page

Select Code to Download


  1. or download this
    use Net::SSH::Any qw();
    my $ssh =
      Net::SSH::Any->new( '172.20.251.20', user => 'root', password => 'r3
    +v3nue' );
    my @tmp = $ssh->capture('ls -lrt');
    print " @tmp";
    
  2. or download this
     Use of uninitialized value $tmp[0] in join or string at test.pl line 7.