| line |
true |
false |
branch |
|
26
|
9 |
0 |
ref $_[1] ne 'SCALAR' ? : |
|
|
0 |
9 |
!ref($_[1]) ? : |
|
49
|
0 |
0 |
unless defined $arg and $arg =~ /^\d+$/ |
|
60
|
0 |
0 |
unless defined $search and defined $replace |
|
72
|
0 |
0 |
unless defined $pattern |
|
76
|
0 |
0 |
unless scalar @maches |
|
86
|
0 |
0 |
unless defined $pattern |
|
96
|
0 |
0 |
unless defined $pattern |
|
133
|
0 |
0 |
unless length $val |
|
160
|
0 |
0 |
if ($num =~ /^[-+]?\d\d\d\d+/g) |
|
217
|
0 |
0 |
if (defined $key) |
|
227
|
0 |
0 |
if (defined $key) |
|
295
|
0 |
0 |
ref $_[0] ? : |
|
355
|
0 |
0 |
if (defined $type and $type eq 'keys') { } |
|
|
0 |
0 |
elsif (defined $type and $type eq 'values') { } |
|
|
0 |
0 |
elsif (defined $type and $type eq 'each') { } |