我正在开发一个通过 IMAP 访问 Outlook.com 的 Perl 程序。似乎我无法可靠地将\Deleted
标签附加到存档文件夹中的消息。一个示例会话:
>> 1 UID FETCH 152108 (uid body[header.fields (Message-ID)])
<< * 50190 FETCH (UID 152108 BODY[HEADER.FIELDS (Message-ID)] {84}
<< Message-ID: <XYZ@PQR.com>
<<
<< FLAGS (\Seen))
<< 1 OK FETCH completed.
>> 2 UID STORE 152108 +FLAGS.SILENT (\Deleted)
<< 2 OK STORE completed.
>> 3 UID FETCH 152108 (uid body[header.fields (Message-ID)])
<< * 50190 FETCH (UID 152108 BODY[HEADER.FIELDS (Message-ID)] {84}
<< Message-ID: <XYZ@PQR.com>
<<
<< FLAGS (\Seen))
<< 3 OK FETCH completed.
因此,后续Expunge
将不会删除这些消息。相同的代码能够可靠地删除其他文件夹中的消息,而对于存档文件夹,它偶尔会起作用,但大多数情况下不起作用。对于可能导致这种行为的任何建议,我将不胜感激。非常感谢你!