Branch Coverage

blib/lib/Mail/SPF/Record.pm
Criterion Covered Total %
branch 0 50 0.0


line true false branch
129 0 0 unless $self->class ne __PACKAGE__
132 0 0 unless defined $self->{'parse_text'}
196 0 0 unless defined $self->{'parse_text'}
205 0 0 if (not $self->{'parse_text'} =~ s/^${\$self->version_tag_pattern;}(?:\x20+|$)//)
217 0 0 if ($@)
220 0 0 if ($self->{'parse_text'} =~ s/ ^ ( ${\'Mail::SPF::Mech'->qualifier_pattern;}? (${\'Mail::SPF::Mech'->name_pattern;}) [^\x20]* ) (?: \x20+ | $ ) //x) { }
0 0 elsif ($self->{'parse_text'} =~ s/ ^ ( (${\'Mail::SPF::Mod'->name_pattern;}) = [^\x20]* ) (?: \x20+ | $ ) //x) { }
234 0 0 unless defined $mech_class
252 0 0 if (defined $mod_class) { }
255 0 0 if ($mod->isa('Mail::SPF::GlobalMod')) { }
0 0 elsif ($mod->isa('Mail::SPF::PositionalMod')) { }
257 0 0 if defined $self->{'global_mods'}{$mod_name}
284 0 0 if $self->{'parse_text'} ne ""
300 0 0 unless defined $self->{'text'}
388 0 0 unless defined $server
390 0 0 unless defined $request
397 0 0 if ($term->isa('Mail::SPF::Mech')) { }
0 0 elsif ($term->isa('Mail::SPF::PositionalMod')) { }
0 0 elsif ($term->isa('Mail::SPF::UnknownMod')) { }
400 0 0 if ($term->name eq "include")
402 0 0 if (scalar @include_domains > 1)
405 0 0 unless (exists $inc_domain_cname{$dom})
409 0 0 if (defined $inc_domain_cname{$dom})
410 0 0 if (grep /^$inc_domain_cname{$dom}$/, @include_domains)
418 0 0 if ($mech->match($server, $request))