| line |
true |
false |
branch |
|
205
|
2 |
2 |
if ($arg and $arg->{'on_undef'}) |
|
255
|
1 |
71 |
if $pos < length $string |
|
270
|
2 |
74 |
unless defined $conv |
|
274
|
58 |
16 |
$hunk->{'extra'} ? : |
|
283
|
0 |
74 |
unless defined $conv |
|
286
|
2 |
72 |
if (not defined $hunk->{'replacement'} and my $on_undef = $self->{'String::Errf'}{'on_undef'}) |
|
299
|
36 |
69 |
if ref $input eq 'HASH' |
|
307
|
53 |
16 |
defined $args[0] && length $args[0] && !($args[0] =~ /=/) ? : |
|
313
|
53 |
16 |
$first ? : |
|
330
|
3 |
0 |
$_[0] eq '+' ? : |
|
334
|
0 |
6 |
unless $int_value == $value |
|
336
|
2 |
4 |
if $value < 0 |
|
338
|
2 |
2 |
unless defined $arg->{'prefix'} |
|
358
|
43 |
11 |
unless defined $arg->{'precision'} and length $arg->{'precision'} |
|
360
|
33 |
21 |
unless defined $arg->{'prefix'} |
|
363
|
11 |
43 |
defined $arg->{'precision'} ? : |
|
366
|
10 |
44 |
$value < 0 ? : |
|
379
|
2 |
0 |
$type eq 'time' ? : |
|
|
2 |
2 |
$type eq 'date' ? : |
|
|
5 |
4 |
$type eq 'datetime' ? : |
|
385
|
0 |
9 |
unless $zone eq 'local' or $zone eq 'UTC' |
|
388
|
4 |
5 |
$zone eq 'UTC' ? : |
|
393
|
4 |
5 |
$zone eq 'UTC' ? : |
|
404
|
1 |
24 |
$singular =~ s/y\z/ies/ ? : |
|
|
4 |
25 |
$singular =~ /(?:[xzs]|sh|ch)\z/ ? : |
|
417
|
27 |
5 |
unless defined $divider |
|
419
|
3 |
27 |
$divider eq '+' ? : |
|
|
2 |
30 |
$divider eq '/' ? : |
|
432
|
0 |
36 |
unless defined $arg->{'singular'} |
|
434
|
2 |
34 |
unless defined $arg->{'plural'} |
|
436
|
15 |
21 |
abs $value == 1 ? : |
|
438
|
18 |
18 |
if $hunk->{'conversion'} eq 'N' |