use Net::POP3Client; my $pop= new Mail::POP3Client ( USER => "myuser", PASSWORD => "mypass", HOST => "127.0.0.1"); for (my $i=1;$i <= $pop->Count;$i++) { my $head = $pop->Head($i); my $body = $pop->Body($i); }
(Code untested).
--------------------------------------------------------------
"If there is such a phenomenon as absolute evil, it consists in treating another human being as a thing."
John Brunner, "The Shockwave Rider".
In reply to Re: Removing Headers from E-mail Messages.
by g0n
in thread Removing Headers from E-mail Messages.
by spiritway
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |