| line |
true |
false |
branch |
|
70
|
1 |
49 |
unless @_ |
|
73
|
1 |
49 |
unless defined $/ |
|
75
|
8 |
41 |
if (ref $ref eq 'SCALAR' and defined $$ref) { } |
|
|
40 |
1 |
elsif (ref $ref eq 'ARRAY') { } |
|
|
1 |
0 |
elsif (ref $ref eq 'HASH') { } |
|
76
|
5 |
3 |
if ($/ =~ /^$nl$/so) { } |
|
84
|
40 |
0 |
if ($/ =~ /^$nl$/so) { } |
|
86
|
0 |
1572 |
unless defined $_ |
|
95
|
1 |
0 |
if ($/ =~ /^$nl$/so) { } |
|
97
|
0 |
4 |
unless defined $ref->{$_} |
|
163
|
0 |
385 |
unless not defined $oref or ref $iref eq ref $oref |
|
168
|
1 |
384 |
if (ref $type eq 'Regexp') { } |
|
172
|
383 |
1 |
if (defined $type and exists $regexes{$type}) { } |
|
180
|
228 |
157 |
unless (defined $oref) |
|
181
|
2 |
224 |
ref $iref eq 'HASH' ? : |
|
|
2 |
226 |
ref $iref eq 'ARRAY' ? : |
|
188
|
377 |
8 |
if (ref $oref eq 'SCALAR') { } |
|
|
4 |
4 |
elsif (ref $oref eq 'ARRAY') { } |
|
197
|
384 |
1 |
if (defined $regex) |
|
198
|
376 |
8 |
if (ref $iref eq 'SCALAR') { } |
|
|
4 |
4 |
elsif (ref $iref eq 'ARRAY') { } |
|
200
|
375 |
1 |
if defined $$iref |
|
204
|
4 |
0 |
if (scalar @$iref) |
|
208
|
11 |
0 |
defined $_ ? : |
|
210
|
3 |
8 |
unless defined $oref->[-1] |
|
216
|
4 |
0 |
if (scalar keys %$iref) |
|
222
|
11 |
0 |
defined $iref->{$_} ? : |
|
224
|
3 |
8 |
unless defined $oref->{$_} |
|
231
|
228 |
157 |
unless ($po) |
|
232
|
224 |
4 |
if (ref $iref eq 'SCALAR') { } |
|
|
2 |
2 |
elsif (ref $iref eq 'ARRAY') { } |
|
263
|
2 |
0 |
if (defined $input and @match) |
|
266
|
6 |
0 |
if defined $_ |
|
269
|
6 |
0 |
if defined $_ |
|
270
|
4 |
2 |
m[^/(.+)/$]s ? : |
|
276
|
1 |
2 |
if ($input =~ /$r/is) |