line |
true |
false |
branch |
71
|
1 |
69 |
if $pos < length $string
|
86
|
2 |
72 |
unless defined $conv
|
90
|
58 |
14 |
$$hunk{'extra'} ? :
|
99
|
0 |
72 |
unless defined $conv
|
108
|
36 |
69 |
if ref $input eq 'HASH'
|
116
|
53 |
16 |
defined $args[0] && length $args[0] && !($args[0] =~ /=/) ? :
|
122
|
53 |
16 |
$first ? :
|
139
|
3 |
0 |
$_[0] eq '+' ? :
|
143
|
0 |
6 |
unless $int_value == $value
|
145
|
2 |
4 |
if $value < 0
|
147
|
2 |
2 |
unless defined $$arg{'prefix'}
|
166
|
43 |
11 |
unless defined $$arg{'precision'} and length $$arg{'precision'}
|
169
|
33 |
21 |
unless defined $$arg{'prefix'}
|
171
|
11 |
43 |
defined $$arg{'precision'} ? :
|
175
|
10 |
44 |
$value < 0 ? :
|
188
|
2 |
0 |
$type eq 'time' ? :
|
|
2 |
2 |
$type eq 'date' ? :
|
|
5 |
4 |
$type eq 'datetime' ? :
|
194
|
0 |
9 |
unless $zone eq 'local' or $zone eq 'UTC'
|
197
|
4 |
5 |
$zone eq 'UTC' ? :
|
202
|
4 |
5 |
$zone eq 'UTC' ? :
|
213
|
1 |
24 |
$singular =~ s/y\z/ies/ ? :
|
|
4 |
25 |
$singular =~ /(?:[xzs]|sh|ch)\z/ ? :
|
226
|
27 |
5 |
unless defined $divider
|
228
|
3 |
27 |
$divider eq '+' ? :
|
|
2 |
30 |
$divider eq '/' ? :
|
240
|
0 |
36 |
unless defined $$arg{'singular'}
|
243
|
2 |
34 |
unless defined $$arg{'plural'}
|
245
|
15 |
21 |
abs $value == 1 ? :
|
247
|
18 |
18 |
if $$hunk{'conversion'} eq 'N'
|