| blib/lib/URI/_idna.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 20 | 70.0 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 0 | 3 | "$]" < 5.008003 ? : |
| 27 | 1 | 8 | if @labels > 1 and $labels[-1] eq "" |
| 49 | 0 | 29 | if $label eq "" |
| 50 | 1 | 28 | if length $label > 63 |
| 56 | 12 | 17 | if $label =~ /$ASCII/ |
| 62 | 0 | 17 | if $label =~ /$ASCII/ |
| 65 | 0 | 17 | if ($label =~ /^xn--/) |
| 81 | 0 | 29 | unless $label =~ /$ASCII/ |
| 82 | 19 | 10 | unless $label =~ /^xn--/ |
| 85 | 0 | 10 | if (lc $label ne $label2) |