電子郵件腳本不是IIS

Question

工作，我有以下的測試腳本，以發送電子郵件：

use strict; 
use Net::SMTP; 

print "Content-Type: text/plain\n\n"; 
print "Sending email...\n"; 

my $smtp = Net::SMTP->new('10.0.0.1', Port => 25, Timeout => 10, Debug => 1); 
$smtp->mail("user1\@domain.local"); 
$smtp->to("user2\@domain.local"); 
$smtp->data(); 
$smtp->datasend("From: user1\@domain.local\n"); 
$smtp->datasend("To: user2\@domain.local\n"); 
$smtp->datasend("Subject: Test\n\n"); 
$smtp->datasend("Testing 1 2 3\n"); 
$smtp->datasend(); 
$smtp->quit; 

，當我在命令行中運行它，它工作得很好，我得到的電子郵件的時候了。但是，當我把它放在C:\inetpub\wwwroot並從網絡瀏覽器運行它時，我得到了Sending email...文本，但沒有任何內容。沒有電子郵件發送，沒有錯誤信息顯示。我查看了郵件服務器日誌，甚至沒有連接。我不知道爲什麼它從cmd工作，但不是從IIS工作。腳本是否需要一些額外的配置才能通過IIS執行此操作？

我也嘗試過sendmail()並獲得類似的結果。

Answer 1

首先，添加以下標頭文件

use strict 'vars'; 
use warnings; 
use diagnostics; 
use feature qw/say/; 
use CGI::Carp qw(warningsToBrowser fatalsToBrowser); 

... your code... 

# Print Warnings 
warningsToBrowser(1); 

這會給你更多的信息，如果它的失敗或扔東西的警告。

其次，你是如何安裝Net :: SMTP的？確保它以及它的所有依賴項都具有IIS工作進程的權限。