Hi,
I'm trying to decode an email body, with stuff like:
=C2=A0 *Email:*=C2=A0 =C2=A0=C2=A0
I'm trying to use this module:
https://metacpan.org/pod/MIME::Words
But it doesn't seem to want to work for me :(
my $message = q|testing a reply *Do it as *html=C2=
=A0I guess Andy Newby=C2=A0 *Email:*=C2=A0 =C2=A0=C2=A0 andy@xx.co.u
+k =C2=A0 * WWW: =C2=A0 =C2=A0=C2=A0 * http://www.xx.co.=
uk =C2=A0 Mobile:=C2=A0* =
=C2=A002269 201 576 =C2=A0=C2=A0
|;
use MIME::Words qw(:all);
my $test = decode_mimewords($message);
print "FOO: $test \n";
All I get outputted, is the exact same input. Could someone please advise on how I can do this? (I've never really dabbled with reading emails before, so this is a bit new to me)
Thanks
Andy
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.