🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.os.linux.programacion
Article #8373

Re: Envio de mail en Perl sin usar librerias

#8373
From: Fernando Scandolo
Date: Wed, 13 Nov 2002 13:32
32 lines
2149 bytes
  Muchas gracias Madbit, algo asi estaba buscando !

  Saludos,
  --Fernando

On Wed, 13 Nov 2002 13:45:02 +0100
M4DbiT <dbravo@bravoporti.com> wrote:

> On Wed, 13 Nov 2002 13:11:44 +0100, Fernando Scandolo (D`arcy) wrote:
> 
> >   Quisiera saber si conocen alguna manera simple de enviar correo SMTP
> >   desde perl sin usar librerias como Mail:Send o Mail:Sendmail . Desde
> >   ya, muchas gracias !
> > 
> >   Saludos,
> >   --Fernando
> 
> Pipeando un mensaje segun el RFC de los mails (que no me acuerdo)
>  al demonio del correo del tiron.
> 
> #!/usr/bin/perl -w
> use strict;
> 
> my $to = "heidi@mountain.com";
> 
> open(SENDMAIL,"| /usr/bin/sendmail " . $to) || die "Error: $!\n";
> print "To: $to" . "\n";
> print "Subject: Prueba" . "\n";
> print "\n"; # Hace falta una linea en blanco entre las cabezeras y el
> cuerpo.
> print "Hola" . "\n";
> close(SENDMAIL);
Technical Details
Message-ID: <20021113103221.58984a53.darcy@darcy.com.ar>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!canoe.uoregon.edu!arclight.uoregon.edu!enews.sgi.com!nntp1.phx1.gblx.net!nntp.gblx.net!nntp.gblx.net!newsfeed.news2me.com!news-xfer.cox.net!mainake.escomposlinux.org!pinsa.escomposlinux.org!not-for-mail
References: <20021113091144.7c719549.darcy@darcy.com.ar> <pan.2002.11.13.13.45.01.298171.4933@bravoporti.com>

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII-7-bit
X-Google-Thread: f86c8,ef343de5f1a99a72
X-Google-Attributes: gidf86c8,public
X-Google-ArrivalTime: 2002-11-13 05:32:24 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!canoe.uoregon.edu!arclight.uoregon.edu!enews.sgi.com!nntp1.phx1.gblx.net!nntp.gblx.net!nntp.gblx.net!newsfeed.news2me.com!news-xfer.cox.net!mainake.escomposlinux.org!pinsa.escomposlinux.org!not-for-mail
From: Fernando Scandolo (D`arcy) <darcy@darcy.com.ar>
Newsgroups: es.comp.os.linux.programacion
Subject: Re: Envio de mail en Perl sin usar librerias
Date: Wed, 13 Nov 2002 10:32:21 -0300
Organization: Ecolnet
Lines: 32
Message-ID: <20021113103221.58984a53.darcy@darcy.com.ar>
References: <20021113091144.7c719549.darcy@darcy.com.ar>
 <pan.2002.11.13.13.45.01.298171.4933@bravoporti.com>
NNTP-Posting-Host: 200.45.234.183
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
X-Trace: pinsa.escomposlinux.org 1037194343 9550 200.45.234.183 (13 Nov 2002 13:32:23 GMT)
X-Complaints-To: newsmaster@pinsa.escomposlinux.org
NNTP-Posting-Date: Wed, 13 Nov 2002 13:32:23 +0000 (UTC)
X-Newsreader: Sylpheed version 0.8.2 (GTK+ 1.2.10; i586-pc-linux-gnu)