サーバから未読メールを取得しようとしています。私はperlスクリプトとNet :: IMAP :: Simpleパッケージを使用しています。私は事務用のこのスクリプトを書いています。以下はパッケージ "Net :: IMAP :: Simple"でオブジェクトメソッド "see"を見つけることができません
はいくつかのコードです:
use strict;
use warnings;
use Net::IMAP::Simple;
use Email::Simple;
use HTTP::Date;
#some code....
# Create the object
my $server = Net::IMAP::Simple->new($imap_server) or die "Can't connect to server: $imap_server ";
# Log on
my $login = $server->login($imap_user,$imap_passwd) or die "Login failed (bad username or password)";
#some code.....
# set the message as seen
$server->see($i);
# i also used $server->add_flags($i,'\Seen'); but it throws same error.
アイロニーがあり、このコードは、私がテストに使用Gmailアカウント、上で正常に動作します。しかし、私がオフィスでそれをテストすると、エラーがスローされます。
は、オブジェクトのメソッドは、パッケージ「ネット:: IMAP :: Simpleは」私はここでの問題だかわからない
を経由して「見る」見つけることができません。
'perl -MNet :: IMAP :: Simple -E 'とは何か$ Net :: IMAP :: Simple :: VERSION'' printと言っていますか? – Dada
@dada:今私は(私の電話で)システムにアクセスできません。確かに確認します。詳細を教えてもらえますか?それは何を印刷するのか、それは何を意味するのでしょうか? – RaJ
@dadaはおそらく正しいです。 Net :: IMAP :: Simpleの古いバージョンがあるようです。 'perl -MNet :: IMAP :: Simple \ 999'を実行してバージョンを取得することもできます(エラーメッセージとして)。 – simbabque