| blib/lib/String/Print.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 59 | 95 | 62.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 87 | 12 | 1 | 1 | @_ and $_[0] eq 'oo' |
| 204 | 0 | 6 | 8 | defined $value and @parts |
| 205 | 1 | 0 | 6 | ref $value and &reftype($value) eq 'HASH' |
| 273 | 0 | 0 | 15 | defined $value and length $value |
| 302 | 0 | 0 | 0 | not $max and $width |
| 0 | 0 | 0 | not $max and $width and $width <= $s->columns | |
| 306 | 0 | 0 | 0 | $max and $s->columns > $max |
| 312 | 3 | 4 | 6 | not $max and $width |
| 7 | 5 | 1 | not $max and $width and $width <= length $s | |
| 313 | 9 | 0 | 3 | $max and length $s > $max |
| 325 | 0 | 0 | 19 | defined $value and length $value |
| 332 | 1 | 13 | 18 | @scale > 1 and $value > 999 |
| 354 | 0 | 0 | 5 | defined $value and length $value |
| 356 | 1 | 1 | 3 | $value =~ /^\s*([0-9]+)\s*$/ and $1 < 2200 |
| 367 | 0 | 0 | 6 | defined $value and length $value |
| 381 | 0 | 0 | 4 | defined $value and length $value |
| 395 | 2 | 0 | 2 | defined $value and length $value |
| 410 | 7 | 0 | 5 | defined $value and length $value |
| 435 | 0 | 0 | 45 | length $printp and $printp =~ s/^([^%]+)//s |
| line | l | !l | condition |
|---|---|---|---|
| 70 | 3 | 21 | $args->{'serializers'} || {} |
| 75 | 0 | 24 | $args->{'missing_key'} || \&String::Print::_reportMissingKey |
| 125 | 2 | 0 | $def{'exclude'} || [] |
| 143 | 4 | 98 | $args->{'_join'} //= ', ' |
| 383 | 1 | 1 | $3 || 0 |
| 397 | 0 | 2 | ($format =~ /DT\(([^)]*)\)/ ? $1 : undef) || 'FT' |
| 458 | 10 | 15 | $width || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 97 | 11 | 0 | 2 | $all or $func{'printi'} |
| 98 | 11 | 1 | 1 | $all or $func{'sprinti'} |
| 99 | 11 | 0 | 2 | $all or $func{'printp'} |
| 100 | 11 | 2 | 0 | $all or $func{'sprintp'} |
| 205 | 0 | 1 | 0 | index($value, ':') != -1 or $main::main::{$value . '::'} |
| 257 | 3 | 0 | 1 | $pkg->isa('String::Print') or $pkg->isa('Log::Report::Minimal::Domain') |
| 369 | 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*$/ |
| 383 | 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*$/ |