my $ssh2 = get_tiny_ssh2();

my $block1 = 0;
my $block2 = 0;
my $block3 = 0;

my $chan = $ssh2->channel();
$chan->blocking($block1);
$chan->exec('ls -la');
while (<$chan>) { print }
$chan->close;

#shell use
my $chan2 = $ssh2->channel();
$chan2->blocking($block2); #line 21