| line |
true |
false |
branch |
|
65
|
0 |
5 |
ref $ret eq 'CODE' ? : |
|
72
|
0 |
5 |
unless ref $hash_ref eq 'HASH' |
|
85
|
21 |
1 |
if (defined $s) { } |
|
86
|
0 |
21 |
if (ref $s or &Scalar::Util::looks_like_number($s)) { } |
|
109
|
3265 |
0 |
if (defined $value) { } |
|
110
|
6656 |
0 |
if defined $_ |
|
125
|
0 |
17717 |
unless defined $value |
|
127
|
16406 |
1311 |
if ($value =~ s/\A "(.*)" \z/$1/msx) { } |
|
|
116 |
1195 |
elsif ($value =~ s/\A '(.*)' \z/$1/msx) { } |
|
|
1130 |
65 |
elsif ($value =~ /\A [+-]? $NUMBER \z/mosx) { } |
|
128
|
147 |
8453 |
unless $esc2char{$1} |
|
134
|
37 |
1093 |
if ($value =~ s/\A ([+-]?) (?= 0[0-7xb])//msx) { } |
|
135
|
3 |
34 |
$1 eq '-' ? : |
|
158
|
0 |
54 |
unless defined $value |
|
160
|
16 |
38 |
if (is_int($value)) { } |
|
178
|
1 |
23 |
if ($module =~ /[^a-zA-Z0-9_:]/) |
|
183
|
13 |
10 |
if (ref $_[$i + 1]) |
|
190
|
19 |
4 |
unless $module->can('export_into_xslate') |
|
192
|
23 |
0 |
if (not defined $commands or $commands ne '') |
|
212
|
1 |
16 |
if $e |
|
216
|
49 |
0 |
if (ref $entity_ref eq 'GLOB') { } |
|
|
0 |
0 |
elsif (ref $entity_ref eq 'REF') { } |
|
223
|
31 |
18 |
defined $c ? : |
|
231
|
0 |
177 |
if (ref $message eq 'SCALAR') |
|
236
|
154 |
23 |
if ($lines) |
|
237
|
73 |
81 |
unless $lines =~ /\n\z/msx |
|
245
|
16 |
161 |
if $message =~ s/\A \Q$class: \E//msx |
|
247
|
167 |
10 |
if (defined $file) |
|
248
|
164 |
3 |
if (defined $line) |
|
251
|
144 |
23 |
ref $file ? : |
|
254
|
167 |
10 |
if (@extra) { } |
|
268
|
14 |
168 |
unless defined $file and defined $line |
|
270
|
141 |
27 |
if (ref $file) |
|
276
|
3 |
165 |
unless defined $around |
|
277
|
4 |
164 |
unless defined $input_layer |
|
279
|
11 |
157 |
unless open my $in, '<' . $input_layer, $file |
|
285
|
244 |
140 |
if ($. >= $line - $around) |
|
288
|
40 |
344 |
if ($. >= $line + $around) |
|
302
|
74 |
0 |
if defined wantarray |