Lun Oct 09, 2006 8:43 am
|
 |
vcampug
Perlero Nuevo

|
Registrado: 09 Oct 2006
Mensajes: 2
|
|
| Extraer imagenes adjuntas a mail |
|
|
Saludos lista,
se me plantea la necesidad de usar fetchmail+procmail y un script en PERL que extraiga los ficheros adjuntos de cada mensaje recibido y los guarde en una carpeta concreta. Luego el mensaje será descartado.
He visto que tal vez se haga con Mime::Explode pero no tengo claro por donde empezar porque la documentación que he encontrado no me aclaraba nada.
Si alguien fuese tan amable de orientarme un poco se lo agradecería muchísimo.
Gracias de antemando. |
|
|
|

Lun Oct 09, 2006 11:22 am
|
 |
monoswim
Vive para Perl en Español

|
Registrado: 18 Nov 2003
Mensajes: 720
Ubicación: Buenos Aires
|
|
|
|
|
En el archivo del mensaje encontrarás algo así...
Content-Type: image/jpeg; name=Spiral_notebook.jpg
Content-Transfer-Encoding: base64
Content-Disposition: attachment; filename="Spiral_notebook.jpg";
codigo raro del archivo binario....
Tendiendo el archivo puedes parsearlo con algunas expresiones regulares...Si quieres si o si usar un módulo chechea alguno de base64 o mail
http://search.cpan.org/search?query=mail+file&mode=all
Esopero que te sirva
Saludos |
|
Lun Oct 09, 2006 11:58 am
|
 |
explorer
Moderador

|
Registrado: 24 Jul 2005
Mensajes: 4226
Ubicación: Valladolid, España
|
|
|
|
|
Desde el mismo procmail puedes hacer una llamada al programa mimedecode o munpack (si los tienes instalados) para que hagan eso.
Otra opción es Perl, desde luego. |
|
Mie Oct 11, 2006 9:42 am
|
 |
vcampug
Perlero Nuevo

|
Registrado: 09 Oct 2006
Mensajes: 2
|
|
| YA LO TENGO CASI TERMINADO |
|
|
Bueno, deciros que seguí investigando y lo tengo casi casi terminado del todo, solo perfilar un poquito pero en cuento lo tenga mas o menos cerrado os pondre el script PERL.
Volveré a este hilo para entonces.
Saludos y muchas gracias. |
|
Powered by phpBB © 2001, 2005 phpBB Group
|