Bug #77391 for IPC-PerlSSH: Multiple warnings thrown when constructing IPC::PerlSSH with SshOptions => ['-t', '-t']

Perl version: (v5.14.2) Distro: Ubuntu OS version: 3.2.0-24-generic-pae #37-Ubuntu SMP Wed Apr 25 10:47:59 UTC 2012 i686 i686 i386 GNU/Linux Unfortunately I do not know what the issue is. Example code: use strict; use warnings; use IPC::PerlSSH; my $ssh = IPC::PerlSSH->new( Host => 'testbox', Port => 229, SshOptions => ['-t', '-t'] ); $ssh->use_library("Run", qw/system_in system_out/); $ssh->call("system_out", "ls -al"); If you run that code you will see the warnings and the process will hang. All warnings appear to be related to line 256. After all of these warnings are thrown, it appears that the process just hangs. The reason I am using -t -t is to force a pseudotty to be created for use with sudo. You can see that the ssh command provides the required output. ssh -t -t testbox -p 229 "sudo ls -al" total 52 drwx------ 4 lwall lwall 4096 May 22 00:19 . drwxr-xr-x 3 root root 4096 May 20 18:50 .. -rw------- 1 lwall lwall 5214 May 23 20:21 .bash_history -rw-r--r-- 1 lwall lwall 33 May 20 18:50 .bash_logout -rw-r--r-- 1 lwall lwall 176 May 20 18:50 .bash_profile -rw-r--r-- 1 lwall lwall 124 May 20 18:50 .bashrc drwxrwxr-x 6 lwall lwall 4096 May 21 00:43 .cpan -rw------- 1 lwall lwall 43 May 21 23:23 .lesshst drwx------ 2 lwall lwall 4096 May 21 00:13 .ssh -rw-rw-r-- 1 lwall lwall 638 May 22 00:19 test.pl -rw------- 1 lwall lwall 5461 May 22 00:19 .viminfo As does the following code, as long as you do not pass SshOptions ['- t','-t'] use strict; use warnings; use IPC::PerlSSH; my $ssh = IPC::PerlSSH->new(Host => 'testbox', Port => 229, SshOptions => []); $ssh->use_library("Run", qw/system_in system_out/); print $ssh->call("system_out", "ls -al"); This module is great by the way. I love it. Thanks for your awesome contribution and your help in #perl :)