in reply to Error in Net::POP3

I cannot help you with Net::POP3, but have you looked into Mail::Box::POP3? The Mail::Box bundle is actively being developed - the last release happened a little over a month ago -, and a quick glance suggests it supports authentication without forcing SSL/TLS.

That said, I'm not familiar with it and can't vouch for it, much less guarantee it will work on Perl 5.8 (which is really fairly old by now).

Replies are listed 'Best First'.
Re^2: Error in Net::POP3
by bulrush (Scribe) on Jul 01, 2014 at 12:24 UTC
    I'm looking at Mail::Box right now. It looks more updated, Updated in 2014. Thanks!
    Perl 5.8.8 on Redhat Linux RHEL 5.5.56 (64-bit)
[reply]
Re^2: Error in Net::POP3
by bulrush (Scribe) on Jul 01, 2014 at 12:36 UTC
    I'm looking/Googling for some simple code to show me the minimum I need to log in, get a msg, save an attachment.

    Perl 5.8.8 on Redhat Linux RHEL 5.5.56 (64-bit)
[reply]

      Answers to questions are free, consultant work ("code this for me") costs extra. ;)

      That said -- did you look at Mail::Box-Cookbook? The author's website also has various pieces of documentation, including tutorial slides from past workshops.

[reply]
Re^2: Error in Net::POP3
by bulrush (Scribe) on Jul 09, 2014 at 14:30 UTC
    I'm pretty new at Perl email and Object Oriented Perl but I'm not seeing how to save an attached XLS file from a POP3 message. So that's probably why I didn't use Mail::Box::POP3, as I can't find many good coding examples of saving an attachment.

    A Google search did not give me many complete examples. If you have a more complete example I'd appreciate a link to it.

    Perl 5.8.8 on Redhat Linux RHEL 5.5.56 (64-bit)
[reply]

      Disclaimer: I don't have any setup for testing any of this with, but here's some skeleton code: 

      use Mail::Box::POP3;

my $folder = Mail::Box::POP3->new(folder => $ENV{MAIL}, ...);
my $message = $folder->message(0);

if($message->body->isMultipart) {
    foreach my $part ($message->body->parts) {
        my $attached_body = $part->decoded;
        ...
    }
}

      [download]

      This is based on pieces of code found throughout the (admittedly ascetic) Mail::Box documention.

[reply]
[d/l]

In Section Seekers of Perl Wisdom