blib/lib/Text/Elide.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 18 | 0.0 |
line | true | false | branch |
---|---|---|---|
22 | 0 | 0 | unless defined(my $string = shift()) |
23 | 0 | 0 | unless defined(my $length = shift()) |
24 | 0 | 0 | unless $length > 0 |
27 | 0 | 0 | if length $string <= $length |
42 | 0 | 0 | if $string =~ /^\s*\S+$/ |
44 | 0 | 0 | if length $elipsis > $length |
48 | 0 | 0 | if ($broken_word) |
55 | 0 | 0 | unless ($string =~ /\S\s+\S/) |
58 | 0 | 0 | if (length($string) + length($elipsis) <= $length) |