[PerlChina] Fw: Re: Re: [讨论] 大家都用Perl干什么?
win8013p at gmail.com
win8013p at gmail.com
Tue May 23 23:17:03 PDT 2006
发件人:win8013p
发送日期:2006-05-24 14:13:33
收件人:china-pm at pm.org
抄送:
主题:Re: Re: [PerlChina][讨论] 大家都用Perl干什么?
出错了
Can't find string terminator "END_TAG" anywhere before EOF at ./smail line 12.
win8013p at gmail.com
2006-05-24
发件人: Achilles Achilles
发送时间: 2006-05-24 13:59:36
收件人: china-pm at pm.org
抄送:
主题: Re: [PerlChina][讨论] 大家都用Perl干什么?
是不是最后一行要加个点表示结束啊?
On 5/24/06, toby <win8013p at gmail.com> wrote:
以下是个发送邮件的perl程序,我调试不成功,哪位帮忙一下,谢谢
#!/usr/bin/perl
use strict;
my($r_mail) = ' win8013 at 163.com';
my($s_mail) = 'win8013 at chinanetcenter.com';
my($subject) = 'subject';
open(MAIL,'|/usr/lib/sendmail -t');
select(MAIL);
print<<"END_TAG";
To: $r_mail
From: $s_mail
Subject: $subject
ILOVECHINA
END_TAG
_______________________________________________
China-pm mailing list
China-pm at pm.org
http://mail.pm.org/mailman/listinfo/china-pm
--
---------------------------
Achilles Xu
http://www.lazycode.org
More information about the China-pm
mailing list