| line | true | false | branch | 
 
| 60 | 4 | 10 | if $i == 0 | 
 
| 101 | 4 | 10 | if $i == 0 | 
 
| 131 | 8 | 11 | if $v == 2 | 
 
| 149 | 20 | 58 | if $v == 2 | 
 
| 150 | 10 | 48 | if $_[0] =~ /^::ffff:/i | 
 
| 156 | 0 | 8 | if length $_[0] != 4 | 
 
| 178 | 0 | 11 | if length $n != 16 | 
 
| 189 | 8 | 3 | unless $ip =~ /^::/ | 
 
| 190 | 9 | 2 | unless $ip =~ /::$/ | 
 
| 202 | 16 | 14 | unless $_[0] eq join(".", unpack("C4", $n)) | 
 
| 217 | 2 | 46 | if $ip =~ /[^a-fA-F0-9:]/ | 
 
| 218 | 4 | 42 | if $ip =~ /:::/ | 
 
| 221 | 2 | 40 | if $ip =~ /^:[^:]/ | 
 
| 224 | 2 | 38 | if $ip =~ /[^:]:$/ | 
 
| 229 | 4 | 34 | if $col_count > 7 | 
 
| 230 | 6 | 28 | if $dbl_col_count > 1 | 
 
| 231 | 4 | 24 | if $dbl_col_count == 0 and $col_count != 7 | 
 
| 242 | 2 | 22 | if grep {length $_ > 4;} @hextets |