Branch Coverage

blib/lib/Mail/Cap.pm
Criterion Covered Total %
branch 29 56 51.7


line true false branch
32 1 0 if @_ % 2
40 1 0 if defined $args{'filename'} and -r $args{'filename'}
42 0 1 if (not defined $args{'filename'} or $take_all)
44 0 0 unless -r $fname
47 0 0 unless $take_all
51 0 1 unless ($self->{'_count'})
63 0 1 unless my $file = shift()
66 0 1 unless open MAILCAP, $file
73 1 12 if /^\s*#/
74 7 5 if /^\s*$/
82 1 4 unless $type =~ m[/]
89 3 3 if (defined $val) { }
99 1 4 if (my $test = $field{'test'})
100 0 1 unless ($test =~ /\%/)
103 0 0 if $?
108 4 1 unless (exists $self->{$type})
127 0 0 unless defined $cmd
144 0 5 unless $entry and exists $entry->{$method}
152 0 0 unless my $template = $self->nametemplate($type)
177 1 5 if $useCache and exists $self->{'_cache'}{$origtype}
185 2 4 if (exists $_->{'test'})
190 1 1 if $?
195 5 0 if $useCache
201 0 7 unless defined $type
202 0 7 unless defined $file
227 0 0 unless defined $prefix
235 0 0 if /^_/
243 0 0 if (exists $self->{'_cache'})