use Net::SSH::Perl; $sshobj = Net::SSH::Perl->new( $ARGV[0] ); $sshobj->login( "user", "password" ) or die "error $!\n"; for my $cmd ( '\"C:\platform\bin\lo100cfg.exe\" -s 1>nul 2>&1', 'ls -l \"C:\platform\bin\lo100cfg.exe\"', 'ls -l "C:\platform\bin\lo100cfg.exe"', 'ls -l C:\platform\bin\lo100cfg.exe', ) { print "----->$cmd<--\n"; my ( $out, $err, $ext ) = $sshobj->cmd($cmd); print "----->$out<--\n"; print "----->$err<--\n"; print "----->$ext<--\n"; }