Select Code to Download

my $pty = IO::Pty->new;
my $expect = Expect->init($pty);
...
...

# and once the authentication phase is over, $in and $out are used for
+ the rest of the IPC.