| line |
true |
false |
branch |
|
76
|
0 |
36 |
'HASH' eq ref $_[0] ? : |
|
77
|
0 |
36 |
if (defined(my $type = delete $$opt{'type'})) { } |
|
|
16 |
20 |
elsif (ref $self) { } |
|
85
|
0 |
36 |
if @unk |
|
86
|
12 |
24 |
if @_ |
|
104
|
43 |
86 |
if ($cmp < 0) { } |
|
|
64 |
22 |
elsif ($cmp > 0) { } |
|
121
|
395 |
1688 |
unless ++$_ == 256 |
|
130
|
117 |
320 |
unless $_-- == 0 |
|
141
|
15 |
9 |
unless $@ |
|
181
|
0 |
9 |
if @found > 1 |
|
203
|
0 |
15 |
if ($self->is_empty) |
|
208
|
8 |
7 |
if ($$self{'ranges'}[0] eq $min) { } |
|
215
|
8 |
7 |
if ($$self{'ranges'}[-1] eq $max) { } |
|
243
|
22 |
37 |
if $fpos & 1 |
|
244
|
5 |
54 |
if $tpos & 1 |
|
267
|
0 |
43 |
unless my($lo, $hi) = $self->_encode($ip) |
|
371
|
24 |
45 |
if $pos >= $limit |
|
511
|
0 |
2 |
unless @_ |
|
519
|
8 |
2 |
if (defined $v) { } |
|
522
|
0 |
8 |
unless defined $vv and $vv eq $v |
|
527
|
0 |
2 |
if defined $$_[$pos] |
|
531
|
2 |
8 |
unless defined $v |
|
617
|
2 |
1 |
unless @r |
|
618
|
1 |
1 |
unless $r[0] eq $r[1] |
|
661
|
24 |
31 |
unless @r |
|
662
|
31 |
16 |
unless ($r[0] eq $r[1]) |
|
665
|
3 |
28 |
if $pad > $size |
|
669
|
31 |
174 |
if $next le $r[1] |
|
707
|
4 |
12 |
unless my(@r) = &$iter() |