我从 C shell 脚本调用 perl 脚本来发送电子邮件,
/path/send/email/email.pl "[email protected]" | /usr/sbin/sendmail -t
Perl脚本
print "To: ".$ARGV[0]."\n";
但我收到错误
unable to read file
No recipient addresses found in header
请帮忙。
答案1
Perl 数组默认从索引 0 开始。
使用 print print$ARGV[0]
而不是$ARGV[1]
.
此外
- 向 sendmail 命令行添加
-i
选项以禁用对以点 ( ) 开头的行的特殊处理.
。 - 在电子邮件标题后添加空行。