Re: Perl SSH2

The script looks okay to me. If "stopservices" is not running you need to look at how you are calling it in the larger script.

I would add a print line just after "sub stopservices {" to make sure that it is not running. Then look into how you are calling it.

Sparky
FMTEYEWTK

Comment on Re: Perl SSH2

Replies are listed 'Best First'.
Re^2: Perl SSH2 by PilotinControl (Pilgrim) on Jul 22, 2013 at 19:09 UTC
In further review the stand alone script performs the function and the script windows exits after the " sleep 5; " function in the larger program the sub routine does not close down as the main program stays on to perform other functions. I need the " sub stopservices " to exit. In that case a while loop would be needed? Or should I head in a different direction? Thoughts?	[reply]
Re^3: Perl SSH2 by sparkyichi (Deacon) on Jul 22, 2013 at 21:48 UTC
Can you provide more detail about the main script? How do you know stopservices is running and hasn't been skipped? If you need to get out of a sub you can use "return($var)" to return to the calling routine. Sparky FMTEYEWTK	[reply]
Re^4: Perl SSH2 by PilotinControl (Pilgrim) on Jul 23, 2013 at 01:57 UTC
It was a simple fix it seems $chan->blocking(0); was keeping the script from properly executing a command. Thanks for the input it made me look closer at the code in depth instead of just surface.	[reply]