blib/lib/String/Incremental.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 16 | 18 | 88.8 |
line | true | false | branch |
---|---|---|---|
55 | 1 | 15 | unless (defined $i) |
58 | 1 | 14 | unless ($i =~ /^\d+$/) |
61 | 1 | 13 | unless (defined($ch = $self->chars->[$i])) |
91 | 25 | 0 | if (defined $last_ch) |
100 | 21 | 0 | if (defined $last_ch) |
114 | 135 | 50 | $ref eq 'String::Incremental::Char' ? : |
131 | 22 | 21 | unless (defined $match) |
136 | 12 | 9 | wantarray ? : |
148 | 4 | 7 | if (ref $args[0] eq '') |