La Web del Programador: Comunidad de Programadores
 
    Pregunta:  24932 - ¿CÓMO TRATAR LOS ARCHIVOS ADJUNTOS DE EMAIL EN PERL?
Autor:  Stroggo Stróguez
Hola. Mi duda es la sigueinte:

He aprendido a hacer muchas cosas en Perl, a base de tutoriales y manuales que me he bajado por internet, porque es un lenguaje que me encanta. Ya sé cómo mandar un e-mail a través del sendmail de unix, pero no soy capaz de averiguar cómo se mandan los archivos adjuntos. He mirado en un montón de sitios, pero sólo viene cómo mandar correos muy básicos sin archivos adjuntos.
Si alguien pudiera ayudarme...
Muchas gracias.

  Respuesta:  Gonzalo Quiroz
Hola, yo no se exactamente como mandar adjuntos, pero se que hay bibliotecas de funciones ya hechas como por ejemplo la subrutina
"cgi-lib.pl", a la cual tu llamas con un "require" desde tu cgi.
Obiamente esta subrutina debes tenerla en el servidor.
Como esta hay muchas, si quieres estudiar el tema, te puedo mandar unos links donde hay scrips ya hechos sobre correo con attachment y documentos pdf que explican como usar estas subrutinas, además tu puedes bajar estas subrutinas y subirlas a tu servidor.
La subrutina que necesitas se llama "mail-lib.pl", te recomiendo que la subas al subdirectorio cgi-bin de tu servidor para que la llames al principio de tu cgi de esta forma:
#!/usr/local/bin/perl #o donde esté ubicado perl
require "mail-lib.pl";
Espero que te sirva, chao y buena suerte.

los links son: http://cgidir.com/Scripts/Mailing_Lists/
http://www.extropia.com/books/instant_web_scripts/
El ultimo link habla sobre las subrutinas que te mensioné, incluso puedes bajarlas.