# Send email when new record is added
my $mailer = new Mailer ( { smtp => 'SMTPSERVER' } ) or die "Can't init mailer: $Mailer::error";
$mailer->send ( {
to => '$in{'Email'},',
from => 'Your Email Address',
subject => "Record Added to Database",
msg => "Message"
} )
or die "Can't send mail: $Mailer::error";# Send email when new record is added
my $mailer = new Mailer ( { smtp => 'SMTPSERVER' } ) or die "Can't init mailer: $Mailer::error";
$mailer->send ( {
to => '$in{'Email'},',
from => 'Your Email Address',
subject => "Record Added to Database",
msg => "Message"
} )
or die "Can't send mail: $Mailer::error";
This is working except in '$in{'Email'},', the 's cancel eachother out...any ideas...check this here:
http://www.gossamer-threads.com/perl/gforum/gforum.cgi?post=3440
It would seem simple...just replace the 's with "s, but that causes an error. the script wants 's...help me change that
mabel: Dec 11, 2002, 5:45 PM