Select Code to Download

$chan->shell();
print $chan "ls -la\n";
...

print $chan "date\n";
print "LINE : $_" while <$chan>;