I just did this, have fun ^^ you must install Mail-sendmail module #CODE STARTS HERE #!d:\perl\bin\perl.exe -w
use strict; use Mail::Sendmail; my %mymail; # use =cut =cut for /* */ my ($To, $subject, $body); $subject = "subject goes here"; $To = "[EMAIL PROTECTED]"; $body = "Hello friend, \nThis may be of interest to you\nEric"; %mymail = ( To => $To, From => '[EMAIL PROTECTED]', Message => $body, smtp => 'local.smtp.mymailserver.com', #this could be any local smtp server Subject => $subject ); sendmail(%mymail) or die $Mail::Sendmail::error; print "OK. log says: \n", $Mail::Sendmail::log; #CODE ENDS HERE ********************************************************* *Eric T. Wang * *Bioinformatic Support * *University of California, Irvine College of Medicine * *Department of Biological Chemistry * *RK Moyzis Lab * *[EMAIL PROTECTED] * *949-824-1870 * ********************************************************* On Wed, 22 May 2002, Lance Prais wrote: > HOW CAN I SEND MAIL USING PERL ON NT? DOES ANYONE KNOW OF EXAMPLES THAT > ARE OUT THERE ON THE WE? > > > THANKS > LANCE > > > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]