From perldoc Net::POP3
----
use Net::POP3;
# Constructors
$pop = Net::POP3->new('pop3host');
$pop = Net::POP3->new('pop3host', Timeout => 60);
if ($pop->login($username, $password) > 0) {
my $msgnums = $pop->list; # hashref of msgnum => size
foreach my $msgnum (keys %$msgnums) {
my $msg = $pop->get($msgnum);
print @$msg;
$pop->delete($msgnum);
}
}
----
On 5/7/07, Will Smith <[EMAIL PROTECTED]> wrote:
Hi, first of all, I want to apology if this question does not belong to this
mail list.
I am working on an email function that read in pop3 mails and return some
values such as Subject, From, To, Date. I try Net::POP3, simple code like:
my $pop = Net::POP3->new('mymailserver.com', Timeout => 60);
if ($pop->login($username, $password) > 0) {
my $msg = $pop->top(1); # just read the 1 mail
...
}
---
If I stash out the value of $msg, it is an ARRAY(...) . I'm not sure how to
manipulate that. I hope that someone (not getting mad because I pop the
message in wrong room) would help me out a bit with which module is good to
use for this type of work.
Thank you
________________________________
Get your own web address.
Have a HUGE year through Yahoo! Small Business.
_______________________________________________
List: [email protected]
Listinfo:
http://lists.rawmode.org/mailman/listinfo/catalyst
Searchable archive:
http://www.mail-archive.com/[email protected]/
Dev site: http://dev.catalyst.perl.org/
--
<Alanna> Saying that Java is nice because it works on all OS's is like
saying that anal sex is nice because it works on all genders
_______________________________________________
List: [email protected]
Listinfo: http://lists.rawmode.org/mailman/listinfo/catalyst
Searchable archive: http://www.mail-archive.com/[email protected]/
Dev site: http://dev.catalyst.perl.org/
