Branch Coverage

blib/lib/Mail/Milter/Authentication/App/Blocker/App/Command/add.pm
Criterion Covered Total %
branch 0 32 0.0


line true false branch
30 0 0 unless $opt->{'file'}
31 0 0 unless -e $opt->{'file'}
32 0 0 unless $opt->{'id'}
34 0 0 unless $opt->{'callback'}
36 0 0 unless (grep {$opt->{'callback'} eq $_;} @valid_callbacks)
40 0 0 unless $opt->{'value'}
42 0 0 unless $opt->{'with'}
44 0 0 if (not $rcode =~ /^[4|5]\d\d$/u && $xcode =~ /^[4|5]\.\d+\.\d+$/u or substr($rcode, 0, 1) ne substr($xcode, 0, 1))
48 0 0 unless defined $opt->{'percent'}
49 0 0 unless $opt->{'percent'} =~ /^\d+$/u
50 0 0 if $opt->{'percent'} < 0 or $opt->{'percent'} > 100
52 0 0 if ($opt->{'until'}) { }
54 0 0 if (not $dmdate->parse($opt->{'until'})) { }
65 0 0 if @$args
75 0 0 if ($error)
81 0 0 if (exists $$data{$opt->{'id'}})