[Programaci髇] Re: 驴Como hacer para sacar el html de un mail con ayuda de Perl?

Sebasti谩n D. Criado programacion@lugro.org.ar
Mon, 26 Dec 2005 16:33:36 -0300


--nextPart5308881.OcosUfEURk
Content-Type: text/plain;
  charset="utf-8"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: inline

El Lunes 26 Diciembre 2005 13:39, Federico Wiecko escribi=C3=B3:

[...]

> > nombre de archivo y que pueda hacer una u otra cosa leyendo el Subject.
>
> fijate la opci=C3=B3n output_prefix, si no es esa .. fijate en el manual =
page.

Ok
>
> > Necesti alg=C3=BAn otro modulo para leer el subject del mail o simpleme=
nte
> > busco la cadena y comparo?
>
> No, el m=C3=B3dulo Parser parsea el MIME y mantiene un hash de cada cabec=
era.
> Por ejemplo, para leer el subject tenes que hacer
>
> my $parser=3D new MIME::Parser;
> $entity=3D$parser->read(\*STDIN) or Error::error "No se pudo parsear la
> entrada";
> my $head =3D $entity->head;
> my $body=3D $entity->bodyhandle;
>
> $subject=3D$head->get('Subject',0)
>
> y despues podes hacer las cl=C3=A1sicas comparaciones de strings.
>
> Espero te sirva.
> Federico .-
>

Joya, muchas gracias. Pruebo y comento.

Saludos.-

=2D-=20

Sebasti=C3=A1n D. Criado - scriado{en}ciudad.com.ar
** 5tas Jornadas Regionales de Software Libre - Rosario 2005 -=20
http://jornadas.ant.org.ar **
L.U.G.R.o - http://www.lugro.org.ar
GNU/Linux Registered User # 146768
=2D------------------------------------------------------------------
"Si el Universo fuera un programa estar=C3=ADa hecho en C, y correr=C3=ADa =
sobre
un sistema UNIX"
                                                   An=C3=B3nimo.

		=09

--nextPart5308881.OcosUfEURk
Content-Type: application/pgp-signature

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.2 (GNU/Linux)

iD8DBQBDsEWa8hmHQ8ZCg0IRAu6TAJ0a9JZs6SUXqDypgiHumShUPcUIHQCfTHm2
rivm1PAPJ+EG6jq1ekDW/Zs=
=IdPt
-----END PGP SIGNATURE-----

--nextPart5308881.OcosUfEURk--