你有一个关于如何解决这个问题的想法,我遇到了Mail :: IMAPClient库的函数message_string(),这里是我的代码:
#!/ usr / bin / perl -w用严格;使用警告;使用Mail :: …
错误消息告诉您如何处理此问题。一些IMAP服务器错误地计算消息大小 - 特别是,许多(例如特别是GMail)检查本地消息大小,然后在通过IMAP发送消息时将行终止符更改为CRLF,导致实际大小略微不同于服务器告诉客户期待。默认情况下,IMAPClient会在发生这种情况时抛出错误,但您可以告诉它不要说 IgnoreSizeErrors => 1 当您创建实例时。
IgnoreSizeErrors => 1
my $imap = Mail::IMAPClient->new( #Debug => 1, User => 'xxxxx', Password => 'yyyyy', Uid => 1, Peek => 1, # set \Seen flag Socket => IO::Socket::SSL->new( Proto => 'tcp', PeerAddr => 'zzzzzzz', PeerPort => 993, ), # See here IgnoreSizeErrors => 1 );