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) |