Help for this page
$chan->shell(); print $chan "$cmd1\n"; ... print $chan "$cmd2\n"; @out2 = <$chan>; ...