Perl による IMAP 認証

use Mail::IMAPClient;

$imap = Mail::IMAPClient->new(
    Server   => $server,
    User     => $user,
    Password => $password
) || die("Can not login.");