Help for this page

Select Code to Download

Select or download this

sub pty_spawn {
    my $pty = new IO::Pty;
...
    close $pty->slave;
    return $pty;
}