use Mail::Box::Manager; my $mgr = Mail::Box::Manager->new; my $folder = $mgr->open('imap4:Inbox'); my $filter = Mail::Box::Search::IMAP->new ( ...to be defined... ); my @msgs = $filter->search($folder); if($filter->search($message)) {...}
See SYNOPSIS in Mail::Box::Search
THIS PACKAGES IS NOT IMPLEMENTED YET: it waits for Mail::Transport::IMAP4 to be available.
See DESCRIPTION in Mail::Box::Search