| line |
true |
false |
branch |
|
54
|
3 |
0 |
if defined $options{'verbose'} |
|
57
|
0 |
3 |
if defined $options{'backend'} |
|
58
|
3 |
0 |
unless defined $$self{'backend'} |
|
60
|
3 |
0 |
unless (defined $$self{'backend'}) |
|
93
|
0 |
0 |
unless defined $$self{'backend'} |
|
113
|
0 |
0 |
unless defined $$self{'backend'} |
|
132
|
1 |
0 |
if (defined $common and scalar @{$common;} >= 1) |
|
145
|
0 |
2 |
unless defined $routes |
|
148
|
0 |
2 |
if (scalar @hostnames <= 1) |
|
154
|
2 |
22 |
if (not defined $$routes{$host}[$x]{'addr'} or $current_hop ne $$routes{$host}[$x]{'addr'}) |
|
171
|
0 |
0 |
if $$self{'verbose'} |
|
173
|
0 |
0 |
if ($$self{'backend'} eq 'traceroute') { } |
|
|
0 |
0 |
elsif ($$self{'backend'} eq 'Net::Traceroute') { } |
|
|
0 |
0 |
elsif ($$self{'backend'} eq 'Net::Traceroute::PurePerl') { } |
|
175
|
0 |
0 |
if $$self{'verbose'} |
|
176
|
0 |
0 |
unless open my $ph, '-|', "$cmd 2>&1" |
|
181
|
0 |
0 |
if $$self{'verbose'} |
|
185
|
0 |
0 |
if $$self{'verbose'} |
|
187
|
0 |
0 |
if ($rt == 0) |
|
197
|
0 |
0 |
if (defined $cur_hop and !defined($last_hop) || $last_hop ne $cur_hop) |
|
210
|
0 |
0 |
if (defined $cur_hop and !defined($last_hop) || $last_hop ne $cur_hop) |
|
230
|
19 |
12 |
if ($line =~ /(\d+)\s+(.*?)\s+\((\d+\.\d+\.\d+\.\d+)\)/mx) |
|
242
|
0 |
3 |
if $$self{'verbose'} |
|
247
|
0 |
0 |
if $$self{'verbose'} |
|
254
|
0 |
0 |
if $$self{'verbose'} |
|
260
|
0 |
3 |
if (defined $traceroute_bin and $traceroute_bin ne '' and -x $traceroute_bin) |
|
261
|
0 |
0 |
if $$self{'verbose'} |