my @folders = $imap->folders; foreach my $folder (@folders) { $imap->select($folder) or die('Cannot select IMAP folder - ', $@); if ($imap->search(@search)) { push @results, $imap->Results; } }