Branch Coverage

blib/lib/Mail/Box/MH/Labels.pm
Criterion Covered Total %
branch 23 30 76.6


line true false branch
31 0 21 unless $self->{'MBML_filename'} = $args->{'filename'}
56 8 9 unless open SEQ, "<:raw", $seq
64 0 16 unless length $_
66 0 16 unless s/^\s*(\w+)\s*\:\s*//
70 1 15 if ($label eq 'cur') { }
2 13 elsif ($label eq 'unseen') { }
74 10 22 if (/^(\d+)\-(\d+)\s*$/) { }
22 0 elsif (/^\d+\s*$/) { }
97 0 11 unless (@_)
102 0 11 unless open my $out, ">:raw", $filename
116 0 1 unless open my $out, ">>:raw", $filename
136 10 300 unless $labels->{'seen'}
140 351 18 if $labels->{$_}
151 1 11 if $_ eq "current"
161 15 6 $start == $end ? :