|
I tried the sample scripts and got the same behavior. There seems to be a login problem, but I am not sure why.
I am on XP. I take a look at the error before proceeding and there is error content.
---output----
Error: Could not login with those credentials
Additionally, HTTP error: 200 OK
Error: Could not Login.
---end output---
---my script------
#!c:\perl\bin\perl -w
# Perl script that logs in to Gmail, retrieves the user defined labels
# Then prints out all new messages under the first label
use Mail::Webmail::Gmail;
my $gmail = Mail::Webmail::Gmail->new(
username => 'username', password => 'mypassword',
);
my @labels = $gmail->get_labels();
if ( $gmail->error() ) {
print $gmail->error_msg();
}
---end script-----
|
(2)
]
