Branch Coverage

blib/lib/Net/Domain/Info/IDN.pm
Criterion Covered Total %
branch 0 74 0.0


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 ? :