bugzilla中的magic winmail邮件系统配置

看看时间现在已经是快凌晨三点了，还要今晚没有白熬.问题也解决了.不说废话了,入正题.

 

在机房里面做过,bugzilla系统的搭建,还加上一个邮件系统magic winmail.也是在vmware里面的一个操作.

先来说我的环境,PC机,Vmware 6.5,windows 2003  winmail v2.4(build 0605)

 

遇到了一个问题,在百度和goolge里面很少有答案的问题:

 

undef error - Can't open sendmail at C:/Perl/lib/CGI/Carp.pm line 319.

 虽然搜索出来有很多网页,但是实用性还是不强.

 

这里面一个重要的问题是:修改不是在carp.pm里面而是在bugzilla的文件夹里面一个bugmail.pm里面,因为bugzilla没有连接到邮件系统才会出现的问题.

找到这个文件:Bugmail.pm. 用记事本或者是写字板打开,找到最后面那一段代码:

 

sub MessageToMTA ($;$) { my ($msg, $rcpt_to) = (@_); my $sendmailparam = ""; unless (Param("sendmailnow")) { $sendmailparam = "-ODeliveryMode=deferred"; } if ($enableSendMail == 1) { # open(SENDMAIL, "|/usr/lib/sendmail $sendmailparam -t -i") || # die "Can't open sendmail"; # print SENDMAIL trim($msg) . "/n"; # close SENDMAIL; use Net::SMTP; my $smtp_server='192.168.1.5'; //这里是写你的邮件服务器的IP地址 my $smtp_user='[e-mail]'; //管理员帐号 my $smtp_pass='123456'; my $smtp=Net::SMTP->new($smtp_server) || die 'Cannot connect to server /'$smtp_server/''; $smtp->auth($smtp_user,$smtp_pass); $smtp->mail('[e-mail]'); $smtp->to($rcpt_to); //还没有搞弄这个是什么意思,但是建议加上去 $smtp->data(); $smtp->datasend($msg); $smtp->dataend(); $smtp->quit; } } 1;

这是修改之后的代码,我把原来的需要改的一部分加了#,无效状态.

 

为了这个东西,搞了一晚上.思路现在有一点乱,也做了少的无用功.还要能够完成,算是万幸了.希望还有更多经验跟大家分享