Branch Coverage

blib/lib/Mail/Box/Message/Destructed.pm
Criterion Covered Total %
branch 6 22 27.2


line true false branch
32 0 0 if @_ == 1
33 0 0 if defined $head
40 0 0 if @_ == 1
41 0 0 if defined $body
49 0 55 unless $message->isa("Mail::Box::Message")
63 0 0 if @_ and $_[0]
75 2 1 if (@_ == 1)
77 2 0 if $label eq "deleted"
84 0 1 unless keys %flags == 1 and exists $flags{'deleted'}
87 0 1 unless $flags{'deleted'}
92 0 0 wantarray ? :