Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re^3: How to Fetch Gmail

by ww (Archbishop)
on Jan 18, 2011 at 13:59 UTC ( [id://882879]=note: print w/replies, xml ) Need Help??


in reply to Re^2: How to Fetch Gmail
in thread How to Fetch Gmail

OP's code is print $label[0] (and no semicolon, tho that's no big deal here)

As pointed out by lyklev below, $label[0] can be empty.

Example code, from the doc, suggests foreaching the array.

Replies are listed 'Best First'.
Re^4: How to Fetch Gmail
by cjb (Friar) on Jan 18, 2011 at 14:30 UTC
    Having run both the OPs version and yours they both come back with 0.
    use warnings; use strict; use Mail::Webmail::Gmail; my $gmail = Mail::Webmail::Gmail->new( username => '', password => '', proxy_name => 'localho +st:3128' ); my @labels = $gmail->get_labels(); print "Number of labels returned: ".scalar (@labels)."\n"; foreach my $label (@labels) { print "Label: $label\n"; }

    From my test above, it would appear that Mail::Webmail::Gmail->new() completes without error even with a known bad password.

    2011-01-19 09:29 GMT - restored (in part) after discussion with ww

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://882879]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (5)
As of 2024-03-29 08:34 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found