| blib/lib/Articulate/Sortation/Slug.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 22 | 72.7 |
| line | true | false | branch |
|---|---|---|---|
| 57 | 11 | 28 | if ($l =~ /^[^a-z0-9]/i) { } |
| 1 | 27 | elsif ($r =~ /^[^a-z0-9]/i) { } | |
| 11 | 16 | elsif ($l =~ /^[0-9]/) { } | |
| 58 | 0 | 11 | if ($r =~ /^[a-z0-9]/i) |
| 71 | 11 | 0 | if ($r =~ /^[0-9]/) { } |
| 75 | 9 | 2 | if $res |
| 85 | 5 | 11 | if $res |
| 88 | 1 | 0 | @$ra ? : |
| 1 | 3 | unless @$la | |
| 89 | 3 | 0 | unless @$ra |
| 90 | 0 | 0 | if $left ne $right |