[PerlChina] [讨论] 大家都用Perl干什么？

[Achilles Achilles]

是不是最后一行要加个点表示结束啊？

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
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mail.pm.org/pipermail/china-pm/attachments/20060524/6841b659/attachment.html