Branch Coverage

lib/Qmail/Deliverable.pm
Criterion Covered Total %
branch 19 118 16.1


line true false branch
30 0 0 unless open my $fh, "-|", $command, @args
33 0 0 wantarray ? :
38 6 3 unless open my $fh, "<", $fn
39 3 0 wantarray ? :
70 1 2 -e "$qmail_dir/control/locals" ? :
75 0 1 unless (($_) = lc($_) =~ /$ascii/)
80 0 1 unless (($_) = lc($_) =~ /$ascii/)
86 0 4 unless (($_) = /$ascii/)
87 1 3 if (/^#/) { }
0 3 elsif (s/^=([^:]+)://) { }
2 1 elsif (s/^\+([^:]+)://) { }
1 0 elsif (/^\.$/) { }
107 0 0 unless (($_) = /$ascii/)
115 0 0 if exists $virtualdomains{$domain}
120 0 0 if exists $virtualdomains{$wildcard}
123 0 0 if exists $virtualdomains{''}
137 0 0 unless $parts[$_] eq "-"
148 0 3 unless (my($local) = lc($in) =~ /$valid/)
150 0 3 if (exists $users_exact{$local}) { }
155 1 51 if (exists $users_wild{$try})
163 2 0 if ($qmail_dir eq "t/fixtures")
172 0 0 unless (my($address) = lc($in) =~ /$valid/)
174 0 0 unless $address =~ /\@/
177 0 0 if exists $locals{$domain}
180 0 0 if defined $prepend
187 0 0 if (@_ == 1)
190 0 0 unless (my($address) = lc($in) =~ /$valid/)
193 0 0 unless defined $local
202 0 0 unless (length $dashext)
203 0 0 if -e "$homedir/.qmail"
208 0 0 if -e "$homedir/.qmail-$_"
216 0 0 unless ($valias_exec)
223 0 0 if $? == 0
230 0 0 unless ($vuser_exec)
234 0 0 unless eval { do { _readpipe($vuser_exec, $address) } }
235 0 0 if $? == 0
242 0 0 unless (my($address) = lc($in) =~ /$valid/)
245 0 0 unless defined $local
249 0 0 unless -r $homedir and -x _
250 0 0 if (stat _)[2] & 16
251 0 0 if (stat _)[2] & 2
252 0 0 if -T _
256 0 0 unless defined $dot_qmail
257 0 0 unless length $dot_qmail
259 0 0 unless -e $dot_qmail
260 0 0 unless -r $dot_qmail
261 0 0 unless -s _
265 0 0 if ($dot_qmail[0] =~ /^\|\s*\S*vdelivermail/)
266 0 0 unless ($address =~ /\@/)
277 0 0 if ($dot_qmail[0] =~ /bounce-no-mailbox/)
278 0 0 if -d "$homedir/$origlocal"
279 0 0 if valias($address)
280 0 0 if vuser($address)
281 0 0 if ($VPOPMAIL_EXT)
285 0 0 if vuser($chunks[$_] . '@' . $domain)
292 0 0 if ($dot_qmail[0] =~ /^\|bouncesaying\s+(.*)/)
294 0 0 if @args > 1
298 0 0 if grep /ezmlm/, @dot_qmail
299 0 0 if grep /^\|/, @dot_qmail