| line |
true |
false |
branch |
|
93
|
4 |
0 |
if $k0 eq $k1 |
|
121
|
2 |
0 |
if ($self->opt('telnet_or', '')) { } |
|
132
|
2 |
0 |
if (@results) |
|
157
|
1 |
1 |
unless $self->is_connected |
|
168
|
1 |
0 |
if (@results) |
|
187
|
1 |
7 |
if $self->cond eq 'connected' |
|
188
|
6 |
1 |
if $self->cond eq 'authenticated' |
|
206
|
0 |
1 |
unless $self->is_connected |
|
233
|
0 |
2 |
unless $self->is_connected |
|
237
|
0 |
2 |
unless @results |
|
243
|
6 |
2 |
unless $s =~ /^\s+\d+\s+\|\s+Outlet\d/ |
|
245
|
1 |
9 |
$2 eq 'ON' ? : |
|
|
10 |
10 |
if $outlet =~ /\s+Outlet(\d+)\s+\|\s+([OFN]+)\s*\|/ |
|
248
|
0 |
2 |
unless keys %ps |
|
266
|
0 |
1 |
unless $self->is_connected |
|
271
|
0 |
1 |
unless $ok eq 'OK' |
|
272
|
1 |
0 |
$on_or_off ? : |
|
273
|
0 |
1 |
unless defined $ps_hr->{$outlet} |
|
274
|
0 |
1 |
unless $ps_hr->{$outlet} == $normalized_on_or_off |
|
313
|
0 |
2 |
unless $self->is_connected |
|
317
|
0 |
2 |
unless @results |
|
323
|
0 |
26 |
if ($s =~ /^\s*Sys\s?Name\s*:\s*([^\s]+)/) |
|
324
|
0 |
26 |
if ($s =~ /^\s*IP Static or DHCP/ and $v =~ /Using (\w+)/) |
|
325
|
2 |
24 |
if ($s =~ /^\s*IP-Mask-GW\s*:\s*([^-]+)-([^-]+)-([^\s]+)/) |
|
326
|
2 |
24 |
if ($s =~ m[^\s*Static IP/Mask/Gateway\s*:\s*([^-]+)-([^-]+)-([^\s]+)]) |
|
327
|
2 |
24 |
if ($s =~ /^\s*Ethernet Port is (\w+)/) |
|
328
|
2 |
24 |
if ($s =~ m[^\s*HTTP/Telnet Port .s\s*:\s*(\d+)[^\d]+(\d+)]) |
|
329
|
2 |
24 |
if ($s =~ /^\s*MAC Address\s*:\s*([\w\:]+)/) |
|
330
|
2 |
24 |
if ($s =~ /^\s*Designated Source IP/ and $v =~ /^\s*(\d+\.\d+\.\d+\.\d+)/) |
|
331
|
2 |
24 |
if ($s =~ /^\s*Outlet Status[^:]+: ([\d\s]+)/) |
|
340
|
0 |
2 |
unless keys %st_h |
|
398
|
16 |
24 |
if defined $v |