http://www.perlmonks.org?node_id=206531


in reply to select function from Mail::IMAPClient

You probably want to use the Results method (without argument) to obtain the server response from the last IMAP client command issued:
use strict; use warnings; use Mail::IMAPClient; use Data::Dumper; my $host = 'some.server.net'; my $id = 'login'; my $pw = 'password'; my $folder = "/somepath/tomail/folder"; my $imap = Mail::IMAPClient->new( Server => $host, User => $id, Password => $pw, Debug => 1, ) or die "Cannot connect to $host as $id: $@"; $imap->select($folder); my @results1 = $imap->Results; my @status = $imap->status($folder); my @results2 = $imap->Results; my $uidnext = $imap->uidnext($folder); my @results3 = $imap->Results; print Dumper(\@results1, \@status, \@results2, $uidnext, \@results3);

--Jim