line |
true |
false |
branch |
37
|
0 |
0 |
if $code =~ /[A-Z]/ |
38
|
0 |
0 |
if $code =~ /[a-z]/ |
39
|
0 |
0 |
if $code =~ /[0-9]/ |
45
|
0 |
0 |
if 0 <= $digit and $digit <= 25 |
46
|
0 |
0 |
if 26 <= $digit and $digit <= 36 |
52
|
0 |
0 |
$firsttime ? : |
70
|
0 |
0 |
if ($code =~ s/(.*)$Delimiter//o) |
72
|
0 |
0 |
unless $1 =~ /^$BasicRE*$/o |
82
|
0 |
0 |
unless defined $digit |
84
|
0 |
0 |
$k >= $bias + 26 ? : |
|
0 |
0 |
$k <= $bias ? : |
86
|
0 |
0 |
if $digit < $t |
90
|
0 |
0 |
if $DEBUG |
94
|
0 |
0 |
if $DEBUG |
112
|
0 |
0 |
if $b > 0 |
113
|
0 |
0 |
if $DEBUG |
117
|
0 |
0 |
if $DEBUG |
122
|
0 |
0 |
if $c < $n |
123
|
0 |
0 |
if ($c == $n) |
127
|
0 |
0 |
$k >= $bias + 26 ? : |
|
0 |
0 |
$k <= $bias ? : |
129
|
0 |
0 |
if $q < $t |
136
|
0 |
0 |
if $DEBUG |
149
|
0 |
0 |
if $_ <= $min |
173
|
0 |
0 |
if ($label =~ /[^\x00-\x7F]/) |
177
|
0 |
0 |
if ($param{'UseSTD3ASCIIRules'}) |
178
|
0 |
0 |
if $label =~ /^-/ or $label =~ /-$/ or $label =~ /[\x00-\x2C\x2E-\x2F\x3A-\x40\x5B-\x60\x7B-\x7F]/ |
184
|
0 |
0 |
if ($label =~ /[^\x00-\x7F]/) { } |
185
|
0 |
0 |
if $label =~ /^$IDNA_prefix/ |
219
|
0 |
0 |
unless $domain |
220
|
0 |
0 |
if length $_ > 63 and not /[^\x00-\x7F]/ |
229
|
0 |
0 |
unless $email |
231
|
0 |
0 |
unless $email =~ /^([^"\@\x{ff20}]+|"(?:(?:[^"]|\\.)*[^\\])?")(?:[\@\x{ff20}]
(?:([^\[\]]*)|(\[.*\]))?)?$/x |
235
|
0 |
0 |
if $local_part =~ /[^\x00-\x7F]/ |
236
|
0 |
0 |
if $domain_literal |
238
|
0 |
0 |
if $domain |
240
|
0 |
0 |
$domain || $domain_literal ? : |