ぺるりめも / IMAPする (module)Mail-IMAPClientIMAPする (module)Mail-IMAPClient back Mail::IMAPClient を使って、IMAP サーバへアクセス use Mail::IMAPClient; my $serv = "IMAPサーバの指定"; my $user = "ログインユーザ名の指定"; my $pass = "ログインパスワードの指定"; my $auth = "認証の種類 ("CRAM-MD5"とか"PLAIN"とか)"; # ログイン(コンストラクタ) my $o_imap = Mail::IMAPClient->new( Server => $serv, User => $user, Password => $pass, Authmechanism => $auth, ) or die "Cannot connect to server: $@"; while (1) { # 確実
