| blib/lib/String/Print.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 59 | 95 | 62.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 83 | 12 | 1 | 1 | @_ and $_[0] eq 'oo' |
| 200 | 0 | 6 | 8 | defined $value and @parts |
| 201 | 1 | 0 | 6 | ref $value and &reftype($value) eq 'HASH' |
| 269 | 0 | 0 | 15 | defined $value and length $value |
| 298 | 0 | 0 | 0 | not $max and $width |
| 0 | 0 | 0 | not $max and $width and $width <= $s->columns | |
| 302 | 0 | 0 | 0 | $max and $s->columns > $max |
| 308 | 3 | 4 | 6 | not $max and $width |
| 7 | 5 | 1 | not $max and $width and $width <= length $s | |
| 309 | 9 | 0 | 3 | $max and length $s > $max |
| 321 | 0 | 0 | 19 | defined $value and length $value |
| 328 | 1 | 13 | 18 | @scale > 1 and $value > 999 |
| 350 | 0 | 0 | 5 | defined $value and length $value |
| 352 | 2 | 1 | 2 | not $value =~ /\D/ and $value < 2200 |
| 363 | 0 | 0 | 6 | defined $value and length $value |
| 377 | 0 | 0 | 4 | defined $value and length $value |
| 391 | 2 | 0 | 2 | defined $value and length $value |
| 406 | 7 | 0 | 5 | defined $value and length $value |
| 431 | 0 | 0 | 45 | length $printp and $printp =~ s/^([^%]+)//s |
| line | l | !l | condition |
|---|---|---|---|
| 66 | 3 | 21 | $args->{'serializers'} || {} |
| 71 | 0 | 24 | $args->{'missing_key'} || \&String::Print::_reportMissingKey |
| 121 | 2 | 0 | $def{'exclude'} || [] |
| 139 | 4 | 98 | $args->{'_join'} //= ', ' |
| 379 | 1 | 1 | $3 || 0 |
| 393 | 0 | 2 | ($format =~ /DT\(([^)]*)\)/ ? $1 : undef) || 'FT' |
| 454 | 10 | 15 | $width || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 93 | 11 | 0 | 2 | $all or $func{'printi'} |
| 94 | 11 | 1 | 1 | $all or $func{'sprinti'} |
| 95 | 11 | 0 | 2 | $all or $func{'printp'} |
| 96 | 11 | 2 | 0 | $all or $func{'sprintp'} |
| 201 | 0 | 1 | 0 | index($value, ':') != -1 or $main::main::{$value . '::'} |
| 253 | 3 | 0 | 1 | $pkg->isa('String::Print') or $pkg->isa('Log::Report::Minimal::Domain') |
| 365 | 4 | 1 | 1 | $value =~ m[^\s*([0-9]{4})[:/.-]([0-9]?[0-9])[:/.-]([0-9]?[0-9])\s*$] or $value =~ /^\s*([0-9]{4})([0-9][0-9])([0-9][0-9])\s*$/ |
| 379 | 2 | 0 | 2 | $value =~ /^\s*(0?[0-9]|1[0-9]|2[0-3])\:([0-5]?[0-9])(?:\:([0-5]?[0-9]))?\s*$/ or $value =~ /^\s*(0[0-9]|1[0-9]|2[0-3])([0-5][0-9])(?:([0-5][0-9]))?\s*$/ |