The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

WWW::Gmail - Gmail interface

SYNOPSIS

Usage:

use WWW::Gmail;

my $gmail = WWW::Gmail->new( mail => USERNAME@gmail.com, password => PASS);

DESCRIPTION

Gmail interface.

FUNCTIONS

constructor

    my $gmail = WWW::Gmail->new( mail => USERNAME@gmail.com,
                                        password => PASS);

mailNumber

    $total_mails  = $gmail->mailNumber;
        print "total_mails $total_mails \n";

Get the total number of mails

deleteMails

   $gmail->deleteMails;

Delete all mail in the inbox

getbody

  $body = $gmail->getbody(0);
  print "body $body \n";

Get the body of the mail N (N start in 0)

sendMail

        $subject = 'My subject';
        $body = 'My Body';
        $gmail->sendMail('ANOTHER_MAIL@gmail.com',$subject,$body);      
   

LICENSE

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See http://www.perl.com/perl/misc/Artistic.html