Branch Coverage

lib/Sisimai/RFC1123.pm
Criterion Covered Total %
branch 56 60 93.3


line true false branch
47 268 21309 if $argv0 eq "localhost" or $argv0 eq "localhost6"
48 6 21303 if length $argv0 > 255 or length $argv0 < 4
49 314 20989 if index($argv0, ".") == -1
50 302 20687 if index($argv0, "..") != -1
51 11 20676 if index($argv0, "--") != -1
52 0 20676 if index($argv0, ".") == 0
53 0 20676 if index($argv0, "-") == 0
54 1 20675 if substr($argv0, -1, 1) eq "-"
60 218 304045 if $f < 45
61 373 303672 if $f == 47
62 1086 302586 if $f > 57 and $f < 65
63 173 302413 if $f > 90
67 0 18825 if length $cv > 63
70 1406 45089 if $f > 47 and $f < 58
84 381 10157 if length $email < 16
85 10144 13 if substr($email, -1, 1) ne "]"
87 1 12 if $lastb < 0
90 4 8 if (index($email, '@[IPv4:') > 0) { }
7 1 elsif (index($email, '@[IPv6:') > 0) { }
115 6 1 if length $dpart > 2 and rindex($dpart, ":") > 7
146 16911 199 unless "Sisimai::String"->aligned(\$sourcetext, $e)
151 33 166 if $p1 + $cw >= $p2
160 6209 101 if $p1 < 0
168 1545 2 if $p1 < 0
173 1545 0 if scalar @$sourcelist == 0
179 2268 47339 if substr($e, -1, 1) eq "."
182 30877 1140 if length $e < 4 or index($e, ".") == -1 or __PACKAGE__->is_internethost($e) == 0
185 1229 585 if scalar @$foundtoken == 0
186 424 161 if scalar @$foundtoken == 1
190 532 184 if $thelongest >= $cw