【文件属性】：
文件名称：perl-Mail-Sendmail
文件大小：28KB
文件格式：RPM
更新时间：2021-08-16 09:47:13
perl-Mail-Se
在perl中使用本机的sendmail发送邮件的代码如下：
#!/usr/bin/perl
use strict;
my($r_mail) = 'xxxx@163.com';
my($s_mail) = 'root@abc.cn';
my($subject) = '邮件标题';
open(MAIL, '|/usr/lib/sendmail -t');
select(MAIL);
print<<"END_TAG";
To: $r_mail
From: $s_mail
Subject: $subject
邮件内容，database is ok!