如何在Perl Linux中強調文本？

有沒有辦法強調文本是perl輸出腳本？我已經從幾個來源閱讀，但腳本中的文本不能加下劃線。如何在Perl Linux中強調文本？

錯誤輸出：全局符號「$ finalAddition」需要明確包名在C：\ Documents和Settings \ PCS \桌面\的Perl腳本\ script.pl線7

腳本代碼：

#!/usr/bin/perl 

use warnings; 
use strict; 
use Term::ANSIColor; 

$finalAddition = 8; 

print "\n\nThe Final Number after addtion would be ".coloured($finalAddition, 'bold 
underline');

請給出一些建議。謝謝。

來源

2010-09-17 JavaNoob

提示：第7行是什麼？ – Ether 2010-09-17 06:31:32

看看下面的答案？ – JavaNoob 2010-09-17 07:48:37

經過幾輪測試和幾乎砸屏幕，其實很簡單的答案... [編輯]新的和更好的代碼！

#!/usr/bin/perl 

use warnings; 
use strict; 
use Term::ANSIColor; 

my $totalinput = $userinput * $userinput2; 

my $coloredText = colored($totalinput, 'bold underline blue'); 

print "\n\nThe final answer to the question is: $coloredText\n\n";

感謝您的代碼建議！

來源

2010-09-17 06:35:34 JavaNoob

雖然這個工作，我認爲'彩色'功能更具可讀性。你的問題（除了缺少「我的」）是你用英國的拼寫而不是美國的拼寫。 – cjm 2010-09-17 07:20:51

是的，我將我的代碼更改爲彩色（$ text，'粗體下劃線藍色'），它可以變成一個變量並輕鬆打印。 – JavaNoob 2010-09-17 07:42:45

這可能與變量作用域和啓用嚴格模式有關，而不是你試圖實現的目的。更改將「我的」添加到代碼會改變什麼嗎？

#!/usr/bin/perl 

use warnings; 
use strict; 
use Term::ANSIColor; 

my $finalAddition = 8; 

print "\n\nThe Final Number after addition would be " . 
     colored($finalAddition, 'bold underline');

來源

2010-09-17 06:23:01

你的答案的一部分是正確的。我錯過了「我的」，但即使在修復之後，仍然沒有出現。請參閱下面的問題的答案。 – JavaNoob 2010-09-17 06:33:33

另一部分是[Term :: ANSIColor]（http://search.cpan.org/perldoc?Term::ANSIColor）是美國人寫的，功能拼寫爲'colored'，而不是'coloured'。我已經解決了你的答案。 – cjm 2010-09-17 07:17:18

如何在Perl Linux中強調文本？

回答

相關問題