Branch Coverage

blib/lib/Mail/Box/Maildir/Message.pm
Criterion Covered Total %
branch 32 42 76.1


line true false branch
24 478 303 unless @_
27 0 303 if defined $oldname and $oldname eq $newname
29 270 33 $newname =~ /(.*?)(?:\:([12])\,([A-Za-z]*))/ ? :
48 0 303 if (defined $oldname and not move($oldname, $newname))
60 0 0 if defined $timestamp
62 0 0 $self->filename =~ /^(\d+)/ ? :
70 0 431 unless @_
93 87 346 $labels->{'draft'} ? :
96 337 $labels->{'flagged'} ? :
0 433 $labels->{'passed'} ? :
110 323 $labels->{'replied'} ? :
95 338 $labels->{'seen'} ? :
44 389 $labels->{'deleted'} ? :
95 399 34 $labels->{'accepted'} ? :
96 4 429 if ($set ne $newset)
98 3 1 if defined $folder
101 2 32 $oldflags ? :
399 34 $newset ne 'new' || $newflags ne '' ? :
105 13 420 if ($new ne $old)
106 0 13 unless (move($old, $new))
122 0 1 @_ ? :