$ ./mce_openssh.pl
child(1): doing ssh
unable to load Perl module IO::Pty: Can't locate IO/Pty.pm in @INC (@INC contains: /media/psf/shm/trunk/examples/../lib /usr/local/lib64/perl5 /usr/local/share/perl5 /usr/lib64/perl5/vendor_perl /usr/share/perl5/vendor_perl /usr/lib64/perl5 /usr/share/perl5 .) at (eval 10) line 1, <__ANONIO__> line 2.
 at /usr/share/perl5/vendor_perl/Net/OpenSSH.pm line 756.

##</code><code>##

my $sshuser = 'remote_userid';
my $sshpwd  = 'remote_passwd';
my $device  = 'remote_device';

use MCE::Flow max_workers => 1;
use Net::OpenSSH;

mce_flow sub {
   my $wid = MCE->wid;

   MCE->sendto('stdout', "child($wid): doing ssh\n");

   my $ssh = Net::OpenSSH->new(
      $device,
      user => $sshuser,
      passwd => $sshpwd,
      master_opts => [-o => "StrictHostKeyChecking=no"],
      master_stderr_discard => 1
   );

   MCE->sendto('stdout', "child($wid): did ssh - not shown!!! \n");

};