| line |
true |
false |
branch |
|
120
|
1 |
4 |
if ($loop) |
|
146
|
4 |
1 |
if (exists $params{'on_exception'}) |
|
148
|
0 |
4 |
unless not $on_exception or ref $on_exception eq 'CODE' |
|
154
|
1 |
4 |
if (exists $params{'on_exit'}) |
|
156
|
0 |
1 |
unless not $on_exit or ref $on_exit eq 'CODE' |
|
174
|
5 |
0 |
if (my $command = delete $$self{'IPC_PerlSSH_command'}) |
|
197
|
1 |
18 |
if ($closed) |
|
205
|
4 |
14 |
unless defined $message |
|
228
|
0 |
15 |
unless ref $on_response eq 'CODE' |
|
291
|
0 |
10 |
unless ref $on_result eq 'CODE' |
|
294
|
0 |
10 |
unless ref $on_exception eq 'CODE' |
|
303
|
9 |
1 |
if ($ret eq 'RETURNED') { } |
|
|
0 |
1 |
elsif ($ret eq 'DIED') { } |
|
|
1 |
0 |
elsif ($ret eq 'CLOSED') { } |
|
308
|
7 |
3 |
$args ? : |
|
357
|
0 |
1 |
unless ref $on_stored eq 'CODE' |
|
360
|
0 |
1 |
unless ref $on_exception eq 'CODE' |
|
362
|
0 |
1 |
if $self->_has_stored_code($name) |
|
371
|
1 |
0 |
if ($ret eq 'OK') { } |
|
|
0 |
0 |
elsif ($ret eq 'DIED') { } |
|
|
0 |
0 |
elsif ($ret eq 'CLOSED') { } |
|
428
|
0 |
2 |
unless ref $on_result eq 'CODE' |
|
431
|
0 |
2 |
unless ref $on_exception eq 'CODE' |
|
433
|
0 |
2 |
unless $self->_has_stored_code($name) |
|
442
|
2 |
0 |
if ($ret eq 'RETURNED') { } |
|
|
0 |
0 |
elsif ($ret eq 'DIED') { } |
|
|
0 |
0 |
elsif ($ret eq 'CLOSED') { } |
|
447
|
2 |
0 |
$args ? : |
|
498
|
0 |
4 |
unless ref $on_loaded eq 'CODE' |
|
501
|
0 |
4 |
unless ref $on_exception eq 'CODE' |
|
503
|
2 |
2 |
$funcs ? : |
|
504
|
2 |
2 |
if ($@) |
|
509
|
1 |
1 |
if $$self{'stored_pkg'}{$package} |
|
518
|
2 |
0 |
if ($ret eq 'OK') { } |
|
|
0 |
0 |
elsif ($ret eq 'DIED') { } |
|
|
0 |
0 |
elsif ($ret eq 'CLOSED') { } |
|
535
|
0 |
2 |
if defined $$self{'stream'} |