help with Net::POP3

Hi list, I'm playing around Net::POP3. I wanna make a script that is able to check for pop3 mail and then save them in a MySQL database (not implemented yet, usefull for mailing archiving) I'm at the start of the script but i have a problem. First i check for new mail : OK Then i get mail : OK

Re: help with Net::POP3

You need to call $handle-quit (); /Jon Cabezon Aurélien wrote: Hi list, I'm playing around Net::POP3. I wanna make a script that is able to check for pop3 mail and then save them in a MySQL database (not implemented yet, usefull for mailing archiving) I'm at the start of the script

Re: help with Net::POP3

| You need to call $handle-quit (); | | /Jon Great, it works now ! I'm so stupid :p thx a lot. --- Cabezon Aurélien http://www.iSecureLabs.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: help with Net::POP3

[EMAIL PROTECTED] (Cabezon aurélien) writes: Here is the code : [...] And here is a piece of the code indented to aid understanding. #work with each mail## foreach $item (keys %$list) { # get mail $message = $handle-get($item); # print mail (waiting for

formatting is a tool [[was: help with Net::POP3]]

[[a private correspondant]] writes: [ references to my suggested code format change elided...] Just want to thank you for saying it. You're welcome. I share what took me years to learn. Have grabbed large scripts out there to maybe use some or all, and sometimes first have to reformat