Как пометить письма в Gmail как "прочитанные" и удалить их с помощью Mail::Webmail::Gmail, используя скрипт Perl?

Question

Используя Perl, мне нужно читать письма в Gmail, отмечать их как "прочитанные" и удалять их.

Я пробовал приведенный ниже код, как указано в http://search.cpan.org/dist/Mail-Webmail-Gmail/lib/Mail/Webmail/Gmail.pm

use Mail::Webmail::Gmail;
use Data::Dumper;

my $gmail = Mail::Webmail::Gmail->new(
  username => '[e-mail]', password => 'password',
);
print Dumper $gmail;

my @labels = $gmail->get_labels();
print Dumper @labels;

my $messages = $gmail->get_messages( label => $labels[0] );
print Dumper $messages;

Не удалось получить ярлыки, сообщения. Чего здесь не хватает?

Есть ли другой способ, которым я мог бы решить эти задачи в Perl.

Заранее спасибо. Subhash

Answer 1

Этот модуль последний раз обновлялся в 2006 году, и в документации говорится:

Поскольку Gmail в настоящее время находится в режиме бета-тестирования, ожидайте, что этот модуль сломается, поскольку они обновляют свой интерфейс. Я постараюсь сохранить этот модуль в соответствии с изменениями, которые они вносят, но, если после обновления до последней версии этого модуля требуемая функция по-прежнему не работает, пожалуйста, свяжитесь со мной по этой проблеме.

Вы могли бы попытаться связаться с автором, но через десять лет после последнего релиза, похоже, он потерял интерес.

Но у GMail есть интерфейс IMAP. Таким образом, вы должны иметь возможность делать то, что вы хотите с таким модулем, как Mail:: IMAPClient.