blib/lib/Text/Wrapper.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 5 | 6 | 83.3 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
103 | 7 | 4 | 0 | $_wrap_re_cache{$chars} ||= do { if (length $chars) { $chars =~ s/(.)/sprintf '\\x{%X}', ord $1;/seg; qr/ [$hWS]* (?: [^$chars$hWS\n]+ | [$chars]+ [^$chars$hWS\n]* ) [$chars]* /x; } else { qr/ [$hWS]* [^$hWS\n]+ /x; } } |
142 | 1456 | 521 | 823 | $length + length($word) <= $width or $length == $lineStart |