| blib/lib/Lingua/Conjunction.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 22 | 81.8 |
| line | true | false | branch |
|---|---|---|---|
| 117 | 74 | 2 | if defined $_ |
| 120 | 1 | 28 | if $list_count == 0 |
| 121 | 4 | 24 | if $list_count == 1 |
| 124 | 13 | 11 | if $list_count == 2 and not grep({/$punct{'sep'}/;} @list) |
| 127 | 2 | 9 | grep({/\Q$punct{'sep'}\E/;} @list) ? : |
| 129 | 8 | 3 | if ($punct{'pen'}) |
| 213 | 3 | 0 | if ($types{$_[1]}) { } |
| 252 | 5 | 1 | if (defined $language{$language}) { } |
| 265 | 3 | 2 | if ($ENV{'LANGUAGE'} and $ENV{'LANGUAGE'} =~ /^([a-z]{2})/i) |
| 271 | 6 | 0 | unless defined $val |
| 273 | 0 | 0 | if ($val =~ /^([a-z]{2})/i) |