blib/lib/Mail/Box/Message/Destructed.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 6 | 18 | 33.3 |
line | true | false | branch |
---|---|---|---|
32 | 0 | 0 | if @_ and not defined shift() |
41 | 0 | 0 | if @_ and not defined shift() |
51 | 0 | 55 | unless ($message->isa('Mail::Box::Message')) |
66 | 0 | 0 | if @_ and $_[0] |
78 | 12 | 1 | if (@_ == 1) |
80 | 12 | 0 | if $label eq 'deleted' |
86 | 0 | 1 | unless (keys %flags == 1 and exists $flags{'deleted'}) |
92 | 0 | 1 | unless $flags{'deleted'} |
97 | 0 | 0 | wantarray ? : |