Re: Extracting Message body from email using POP3Client
- From: simonhume@xxxxxxxxx
- Date: 27 Feb 2007 02:04:42 -0800
On 17 Jan, 18:25, Eadm...@xxxxxxxxxxxxx wrote:
Hi,
I'm using pop3Client to succeessfullyextracte-mail from my mail
server, BUT depending on the format (ie plain text, richt text or HTML)
that they are sent, I end up with abodythat requres "massaging" with
regular expressions to get a clean message. I am concerned that
different systems will send me mails wilh "slightly" different formats
and wont work with my tidy routines.
Question: Has anyone got any code or can recomend a module that will
extrcat a "clean messagebody" from theemailregardless of format /
system sent from?
Ta
Eadmund
Eadm...@xxxxxxxxxxxxx
Hi,
I'm in a similar position and haven't quite figured this one out, did
you manage to find something?
I too am using the Mail::POP3Client module but by this stage I've
already dumped the email into a MySQL database.
Here's what I have:
$bodystr=index($message,"quoted-printable");
$bodyend=index($message,"</body");
if($bodystr >0) #If it's -1 then it is a plain text message
{
$bodytxt=substr($message,$bodystr+1,$bodyend-$bodystr-length("------
_=_NextPart_001_01C759B8.536E5E3B--")-2);
$bodystr=index($bodytxt,"quoted-printable");
$bodytxt2=substr($bodytxt,$bodystr+length("quoted-
printable"),length($bodytxt)-$bodystr);
$pibody.=$bodytxt2;
}else{
$pibody.=$message;
}
You can probably tell from the code, I'm new to this.
I'm still getting some extra "=" in the body of an HTML email which I
haven't investigated yet.
Thanks,
Simon.
.
- Prev by Date: Re: delete() on multi level hash
- Next by Date: Re: problem cp
- Previous by thread: Question about scoping
- Next by thread: FAQ 5.31 How do I do a "tail -f" in perl?
- Index(es):
Relevant Pages
|
