Select Code to Download

$self->{MB_message_type}->coerce($message);

Mail::Box::Mbox->create($foldername, access => 'rw');
my $folder = Mail::Box::Mbox->new(folder => $foldername);