|
我们公司用了四五年的邮件服务器最近两天更换了新的,然后提交bug就这样了,如题:提示错误为:
undef error - Cannot connect to server '$smtp_server' at /usr/lib/perl5/5.8.5/CGI/Carp.pm line 314.
我按照网上的一些方法,进入BugMail.pm进行如下修改:
use Net::SMTP;
my $smtp_server = 'smtp.mycompany.com '; # 改为你们公司的邮件服务器
# Use die on error, so that the mail will be in the 'unsent mails ' and
# can be sent from the sanity check page.
my $smtp = Net::SMTP-> new($smtp_server) ||
die 'Cannot connect to server \ '$smtp_server\ ' ';
$smtp-> mail( 'bugzilla-daemon@mycompany.com '); # @后的内容改为你们公司的邮件服务器
$smtp-> to($person);
$smtp-> data();
$smtp-> datasend($msg);
$smtp-> dataend();
$smtp-> quit;
然后重启邮件服务器 /etc/init.d/sendmail stop
/etc/init.d/sendmail start
可是不管用,有哪位知道啊?在这多谢了 |
|