line |
true |
false |
branch |
21
|
2 |
22 |
ref $_ eq 'SCALAR' ? : |
22
|
4 |
3 |
if (defined wantarray) { } |
23
|
0 |
16 |
ref $_ eq 'SCALAR' ? : |
24
|
3 |
1 |
if wantarray |
28
|
2 |
6 |
ref $_ eq 'SCALAR' ? : |
51
|
3 |
68 |
if (not ref $spec and $spec =~ s/^auto/num/) { } |
63
|
0 |
0 |
unless defined $obj |
65
|
0 |
0 |
if (ref $obj) { } |
80
|
5 |
477 |
unless defined $obj |
84
|
482 |
0 |
unless ref $obj |
86
|
482 |
0 |
ref $wmeth ? : |
87
|
482 |
0 |
ref $pmeth ? : |
97
|
102 |
632 |
unless defined $lr[0] and defined $lr[1] |
117
|
30 |
0 |
defined $_ ? : |
128
|
185 |
499 |
$repeat_count > 0 ? : |
141
|
39 |
303 |
if $l_pad < 0 |
142
|
51 |
291 |
if $r_pad < 0 |
154
|
288 |
54 |
if ($al->_status) |
169
|
2 |
80 |
if (ref $_ eq 'Regexp') { } |
173
|
7 |
17 |
/$regex/ ? : |
179
|
11 |
69 |
if (_is_number($_)) { } |
|
8 |
61 |
elsif ($_ =~ /^(?:num|point)(?:\((.*))?/) { } |
183
|
2 |
6 |
defined $1 ? : |
185
|
6 |
2 |
unless length $point |
197
|
9 |
170 |
unless defined $x |
198
|
105 |
65 |
unless $x =~ /\d/ |
199
|
51 |
14 |
if $x =~ /^-?\d+\.?\d*$/ |
238
|
25 |
27 |
_is_number($str) ? : |
242
|
28 |
24 |
if $aa->{'num'}->_status |
243
|
28 |
24 |
if $aa->{'other'}->_status |
274
|
65 |
0 |
if (exists $mk->{'seen'}{$val}) |
276
|
63 |
2 |
unless (--$seen->{$val}) |
278
|
62 |
1 |
if ($mk->{'max'} == $val) |