| blib/lib/Text/ANSI/BaseUtil.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 82 | 123 | 66.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 36 | 0 | 0 | 0 | $num >= 30 and $num <= 37 |
| 0 | 0 | 0 | $num >= 40 and $num <= 47 | |
| 286 | 237 | 0 | 0 | $is_mb and $1 |
| 320 | 5 | 114 | 123 | $s_type and $s_type ne "s" |
| 321 | 10 | 2 | 0 | $prev_type and $prev_type ne $s_type |
| 341 | 85 | 29 | 9 | defined $c and not @s |
| 362 | 84 | 27 | 3 | defined $c and not @s |
| 375 | 8 | 0 | 17 | defined $c and $c =~ /m\z/ |
| 465 | 4 | 0 | 0 | $crcode and $_ == 1 |
| 495 | 6 | 2 | 171 | $j < @terms and $termst[$j] ne "p" |
| 524 | 105 | 4 | 2 | $pterm =~ /\n/ and $i == $#terms |
| 549 | 10 | 2 | 109 | $prev_t && $prev_t eq 's' |
| 580 | 1 | 0 | 2 | $prev_t && $prev_t eq 's' |
| 598 | 12 | 0 | 94 | $line_has_word and $ws_before |
| 624 | 1 | 17 | 0 | $ws_before and $optkts |
| 646 | 2 | 8 | 0 | $line_has_word and $pad |
| 678 | 6 | 0 | 1 | $is_trunc and $w > $width |
| 805 | 0 | 0 | 8 | defined $c and $c =~ /m\z/ |
| 831 | 0 | 0 | 0 | $pmin == $_->[0] and length $t < length $_->[1] |
| 945 | 1 | 2 | 1 | $i > 1 && !$savedc |
| 951 | 4 | 0 | 3 | defined $c and $c =~ /m\z/ |
| 961 | 2 | 0 | 2 | $savedc and $i < @text |
| line | l | !l | condition |
|---|---|---|---|
| 28 | 0 | 0 | $state //= {} |
| 190 | 3 | 2 | &max(@lens) // 0 |
| 251 | 10 | 0 | $width //= 80 |
| 252 | 3 | 7 | $opts //= {} |
| 311 | 237 | 25 | $s_type //= "" |
| 436 | 0 | 10 | $opts->{'tab_width'} // 8 |
| 442 | 0 | 10 | $opts->{'keep_trailing_space'} // 0 |
| 487 | 2 | 8 | $fli //= "" |
| 488 | 2 | 8 | $fliw //= 0 |
| 506 | 2 | 8 | $sli //= "" |
| 507 | 2 | 8 | $sliw //= 0 |
| 674 | 1 | 6 | $padchar //= " " |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 312 | 5 | 237 | 20 | $only_code or defined $s |
| 342 | 108 | 7 | 8 | @s or @ch |
| 363 | 109 | 3 | 2 | @s or @ch |
| 484 | 0 | 0 | 0 | $fli //= $pterm |
| 485 | 0 | 0 | 0 | $fliw //= $is_mb ? Text::WideChar::Util::_get_indent_width(1, $fli, $tw) : _indent_width($fli, $tw) |
| 545 | 121 | 0 | 3 | $termw <= $width - $sliw or $termt eq "c" |
| 594 | 10 | 11 | 103 | not defined $maxww or $maxww < $wordw |
| 595 | 10 | 4 | 110 | not defined $minww or $minww > $wordw |
| 831 | 0 | 0 | 0 | $pmin > $_->[0] or $pmin == $_->[0] and length $t < length $_->[1] |
| 870 | 0 | 4 | 5 | $pos > $npos2 or $pos2 < $npos |
| 4 | 0 | 5 | $pos > $npos2 or $pos2 < $npos or not $found |