2017-07-06 86 views
-1

我有一個郵件腳本來發送彩色輸出,但是我不能在Unix機器上使用它,因爲MIME::Lite模塊沒有安裝在它上面。沒有Perl的彩色輸出

任何人都可以提出一種替代方案來獲得所需的顏色輸出?

use MIME::Lite; 

my (@page_html, @sujet); 

my $file = 'rpt.html'; 

open my $ifh, '<', $file 
    or die "Cannot open '$file' for reading: $!"; 

local $/ = ""; 

my $contents = <$ifh>; 

close($ifh); 

my $msg = new MIME::Lite; 

輸出:

<tr><td>test1</td><td bgcolor=red>NOK</td></tr>  
<tr><td>test2</td><td bgcolor=green>OK</td></tr>  
<tr><td>test3</td><td bgcolor=green>OK</td></tr> 

OK應在綠色

NOK應該是紅色

+1

您應該安裝'MIME :: Lite'。這並不難。但MIME與彩色輸出無關。 – Borodin

+0

鮑羅廷,不允許安裝.. – Sunny1985

+0

您可以安裝它僅供您自己使用。 – Borodin

回答

1

的彩色輸出似乎是一個完整的紅鯡魚(哈!)在這裏。您有一個您想要作爲MIME電子郵件附件發送的文件。

如果您打算使用Perl,那麼您需要處於可以從CPAN安裝模塊的環境中。沒有CPAN,你就錯過了現代Perl的大部分功能。我建議,爲了從Perl編程生涯中移除主要塊,需要進行任何討論。

如果您確實無法將模塊安裝到系統庫中,則可以將它們安裝到您的主目錄中,並使用use lib或PERL5LIB來適當調整Perl庫路徑。

當您解決了如何使用CPAN模塊的問題時,我們可以談談您選擇的模塊嗎? MIME :: Lite isn't exactly deprecated,但十多年來已有更好的替代方案。看看Email::Stuffer

但是,如果您確定沒有安裝CPAN模塊的討論,另一種方法是使用命令行程序mailx發送您的消息。

$ mailx -a rpt.html [email protected]