Branch Coverage

blib/lib/Mail/Karmasphere/Parser/Record.pm
Criterion Covered Total %
branch 13 22 59.0


line true false branch
27 0 57 $#_ == 0 ? :
29 0 171 unless defined $$self{$_}
31 36 21 unless exists $$self{'t'}
47 24 33 if (is_ip4($identity)) { }
1 32 elsif ($identity =~ /^[0-9a-f:]{2,64}$/i) { }
8 24 elsif ($identity =~ m[^(https?|ftp)://]) { }
3 21 elsif ($identity =~ /@/) { }
21 0 elsif ($identity =~ /\.[a-z]{2,4}\.?$/) { }
88 0 0 unless $value =~ /["', ]/
106 0 0 if defined $$self{'v'} or defined $$self{'d'}
108 0 0 if defined $$self{'d'}