| blib/lib/Net/SSH/Any/Test/Isolated.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 24 | 45.8 |
| line | true | false | branch |
|---|---|---|---|
| 35 | 3 | 0 | unless (ref $logger) |
| 36 | 3 | 0 | if ($logger eq 'diag') { } |
| 59 | 0 | 3 | unless my $perl = $self->{'perl'} |
| 67 | 0 | 3 | $debug ? : |
| 110 | 9 | 0 | if (my($head, @res) = $self->_recv_packet) { } |
| 111 | 9 | 0 | if ($head eq 'response') { } |
| 0 | 0 | elsif ($head eq 'exception') { } | |
| 112 | 3 | 6 | wantarray ? : |
| 133 | 3 | 0 | $num ? : |
| 151 | 3 | 0 | if ($self->{'state'} eq 'running') |
| 160 | 3 | 0 | if (my $pid = $self->{'pid'}) |
| 179 | 0 | 0 | if ($name =~ /^[a-z]\w+$/i) |