使用Perl邮件脚本发送邮件
时间：2020-01-09 10:43:36 来源:igfitidea点击:
问题描述：如何发送带有perl的电子邮件？
解决方法：在sendmail的帮助下，您可以从基于Web的反馈表中发送电子邮件。
您将需要指出邮件程序Sendmail的路径。
通常，Sendmail的路径是/usr/sbin/sendmail。
这是示例脚本，可以将电子邮件发送到您的帐户或者最终用户。
确保您设置
$to =要发送的邮件地址； $from = [email protected]; $subject =您的主题；
这是使用perl发送电子邮件的示例：
#!/usr/bin/perl print "Content-type: text/html\n\n"; $title='Perl Mail demo'; $to='MAIL ADDRESS TO SEND TO'; $from= '[email protected]'; $subject='YOUR SUBJECT'; open(MAIL, "|/usr/sbin/sendmail -t"); ## Mail Header print MAIL "To: $to\n"; print MAIL "From: $from\n"; print MAIL "Subject: $subject\n\n"; ## Mail Body print MAIL "This is a test message from theitroad.local! You can write your mail body text here\n"; close(MAIL); print "<html><head><title>$title</title></head>\n<body>\n\n"; ## HTML content sent, let use know we sent an email print "<h1>$title</h1><p>A message has been sent from $from to $to</p></body></html>";
上传脚本将脚本上传到您的Web托管cgi-bin目录。
然后通过执行url进行测试。
例如http://mydomain.com/cgi-bin/sendmail.pl。
警告：请注意，以上脚本中的主题行以两个\ n(换行)字符结尾。
这些字符是必需的，以便用空白行将电子邮件标题与电子邮件正文分开。
