http://qs321.pair.com?node_id=11119825

vinoth.ree has asked for the wisdom of the Perl Monks concerning the following question:

Hello all,

I have a perl script on unix server and running it from windows machine. I have already synced the public key generated from windows machine to unix server so it does not ask for password.

ssh.exe username@xxx.xxx.xxx.xxx /fullpath/check_user_exists.pl userna +me

The remote perl script does checks weather the username name exists in a csv file in the unix server that's it. If it exists it exits with 0 otherwise 1.

This is run by all the users in my team it works most of the users for particular user it does not works. When I run this command via command line manually it return 0, but when I call via perl script it returns 255.

What could be the issue? how to debug this issue?

This is how i call this command locally from a perl script on windows side.

sub executeCommand{ my $command = join ' ', @_; $prot and print("Command: $command\n"); my $response = qx($command 2>&1); my $status = $? >> 8; return ($status, $response); } my @src_cmd = ('ssh.exe ', $ssh_user.'@'.$hostname ." /fullpath/check_ +user_exists.pl " . "$user"); my ($status, $output) = &executeCommand(@src_cmd);


All is well. I learn by answering your questions...