Branch Coverage

lib/Net/Sieve/Script/Condition.pm
Criterion Covered Total %
branch 49 86 56.9


line true false branch
45 0 90 unless $param =~ /^(not )?(address|envelope|header|size|allof|anyof|exists|false|true)(.*)/i
80 0 16 if $count >= 50
87 0 35 unless $new_subs
88 6 29 if ($new_subs->test eq 'anyof' or $new_subs->test eq 'allof')
96 22 13 !($first || $last) ? :
100 10 6 !($first || $last) ? :
106 22 90 if $child
112 14 76 if ($test eq 'address')
117 0 90 if ($test eq 'envelope')
122 52 38 if ($test eq 'header')
126 49 3 unless ($match)
130 48 4 unless ($match)
133 3 49 unless ($match)
138 2 88 if ($test eq 'size')
142 2 88 if ($test eq 'exists')
146 3 87 if (lc $match eq ':regex ')
168 0 0 unless defined $object
169 0 0 unless $object->isa('Net::Sieve::Script::Condition')
180 0 0 if (defined $myvalue) { }
181 0 0 unless defined $theirvalue
182 0 0 if ($accessor ne 'key_list')
186 0 0 unless $myvalue eq $theirvalue
188 0 0 if defined $theirvalue
192 0 0 if (defined $self->condition) { }
197 0 0 unless $#myconds == $#theirconds
199 0 0 unless ($#myconds == -1)
203 0 0 if (defined $mycond) { }
204 0 0 unless $mycond->isa('Net::Sieve::Script::Condition')
206 0 0 unless $mycond->equals($theircond)
208 0 0 if defined $theircond
214 0 0 if defined $object->condition
227 18 34 if (defined $self->condition) { }
229 0 18 if $self->not
232 12 39 unless $sub_cond
233 6 33 if (defined $sub_cond->condition)
256 9 58 $self->comparator ? :
258 17 50 if ($self->test eq 'address') { }
0 50 elsif ($self->test eq 'envelope') { }
43 7 elsif ($self->test eq 'header') { }
3 4 elsif ($self->test eq 'size') { }
265 6 37 if ($self->match_type eq ':regex ') { }
277 67 0 $self->header_list ? :
278 60 7 $self->key_list ? :