新开个贴求助
use Ext::RFC822;
my $sender = $self->{sysconfig}->{SYS_GROUPMAIL_SENDER} || $ENV{USERNAME};
my $sendmail = "/usr/sbin/sendmail -oi -t -f \"$sender\"";
open(MAIL, "|$sendmail") or die "Broken pipe: $!\n";
print MAIL "To: $user\@domain\n";
print MAIL "From: postmaster\@$domain\n";
print MAIL "Mime-Version: 1.0\n";
print MAIL 'Subject: '.rfc822_encode_str('utf8',"欢迎使用XX邮件系统")."\n";
print MAIL "Content-Type: text/plain; charset=utf8\n";
print MAIL "Content-Transfer-Encoding: 8bit\n\n";
print MAIL <<EOF
$user您好,欢迎使用$domain邮件系统!
EOF
close MAIL;
这个不成功,syntax error at /var/www/extsuite/extman/libs/Ext/MgrApp/User.pm line 365, near "close" (Might be a runaway multi-line << string starting on line 361) Compilation failed in require at user.cgi line 18.
extman里面显示这个。求解答
[ 本帖最后由 chanli003 于 2010-2-25 12:49 编辑 ] |