[ale] Sending mail in perl

[Chris Farris]

You can always do this:

open (MAIL, "| /usr/sbin/sendmail");
print <<MAIL;
From: Fred Beamer <fred at psiu.org>
To: ale at ale.org
To: ALE <ale at ale.org>
Subject: Stop Spamming me!

This is the body.
MAIL

close (MAIL);



On Sun, 2003-05-04 at 19:59, Geoffrey wrote:
> I've attached a small perl script that is the remants of a script we 
> used to use to send email from perl.  Make sure you change the sender 
> addr, as I believe it's George Washington as it was last used to prove 
> to someone how easy it is to spoof an email address.   Have fun.
> 
> Christopher Fowler wrote:
> > I'm using 'Net::SMTP' but it requires a relay host.  I would like
> > a way in perl to send mail as if I were the relay host.  If I
> > provide a 'user at domain.com' then the perl script will lookup the
> > MX of 'domain.com' and then communicate to it as if it were the smtp
> > server of the sender.  Is there a module that implements this functionality?
> > 
> > 
> > Thanks,
> > Chris
> > _______________________________________________
> > Ale mailing list
> > Ale at ale.org
> > http://www.ale.org/mailman/listinfo/ale
> > 
> > 
> 
> -- 
> Until later: Geoffrey		esoteric at 3times25.net
> 
> The latest, most widespread virus?  Microsoft end user agreement.
> Think about it...

_______________________________________________
Ale mailing list
Ale at ale.org
http://www.ale.org/mailman/listinfo/ale