Select Code to Download

0 LOGIN mda "xxxxxx"
0 OK LOGIN Ok.
...
2 LOGOUT
* BYE Courier-IMAP server shutting down
2 OK LOGOUT completed

sub login {
 my ( $self, $user, $pass ) = @_;
...
    process => sub { },
 );
}

package Net::IMAP::Simple;

...
 );
  return $unseen;
}