| blib/lib/Unicode/CaseFold.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 16 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 26 | 1 | 0 | unless ($ENV{'PERL_UNICODE_CASEFOLD_PP'}) |
| 33 | 1 | 0 | exists $Unicode::CaseFold::{'VERSION'} ? : |
| 37 | 0 | 1 | if $@ and not $@ =~ /object version|loadable object/ |
| 38 | 1 | 0 | unless $@ |
| 39 | 1 | 0 | unless $@ |
| 41 | 0 | 1 | if (not $XS) |
| 47 | 0 | 99 | unless @_ |
| 56 | 1 | 0 | if ($^V ge v5.10.0) { } |