Wyciągnięcie 'Tematu e-maila' bez pl krzaczków ?

[Paweł Sikora]

On Friday 19 of December 2003 12:43, Quickest wrote:
> On Fri, 19 Dec 2003 11:41:37 +0100
>
> Paweł Sikora <pluto w ds14.agh.edu.pl> wrote:
> > On Friday 19 of December 2003 11:21, Quickest wrote:
> > > Otóż sęk w tym, że sama zamiana nic nie da, bo polskie znaki nie są
> > > zapisywane jako "ą" "ę" itp. tylko w ISO-8859-2, czyli ą np, to: =B1
> > > Przykład:
> > >
> > > Subject: =?ISO-8859-2?Q?Chrz=B1szcz_=B6nieg,_=E6ma,_=BCre,_=BFart?=
> > > ;)
> >
> > ktorys z modulow perla perl-MIME*/perl-Mail(Tools?)
> > robi to pieknie w 2-3 wierszach kodu.
>
> Znalazłem coś takiego:
>
> use MIME::Words qw(:all);
>  $decoded = decode_mimewords("wyb=?iso-8859-2?Q?=F3r zespo=B3?=u");
>
> Tylko nie mam zielonego pojęcia jak skorzystać z tego modułu, gdzie mam
> to wstawić aby poprawnie działało i w jakiej formie, przed poleceniem
> 'formail', za, w osobnym pliku ???

zobacz to:

# konwerter.pl
#!/usr/bin/perl
use MIME::Words qw(:all);
print(decode_mimewords(\*STDIN));

cat przykladowy.eml | egrep '^Subject:' | konwerter.pl

-- 
The only thing necessary for the triumph of evil
  is for good men to do nothing.
                                           - Edmund Burke