如何在perl html表中顯示值？

我在發送郵件的perl文件裏面有下面的HTML代碼。郵件部分和html部分是好的，但是當我嘗試在DATA中添加Perl代碼時，它顯示爲$BStatus和$AStatus！上述兩個變量的值已經存在，我確認了它。如何在perl html表中顯示值？

如何顯示其值？

$tme=localtime(); 
$subject='Android Results'; 
use MIME::Lite; 
my $msg = MIME::Lite->new (
    Subject => $subject, 
    From => '[email protected]', 
    To  => '[email protected]', 
    Type => 'text/html', 
    Data => '<H1>Summary</H1><br> <table border="1"> <tr bgcolor="#87CEFA"> <th>Platforms</th> <th>BStatus</th> <th>AStatus</th> <th>Results</th> </tr> <tr> <th bgcolor="#87CEFA">123</th> <td>$kstatus</td> <td>$astatus</td> <td> <a href="http://xx.xxx.xx.xx/Android/123.html">123-Results</a> </tr> <tr> <th bgcolor="#87CEFA">atgs</th> <td>row 2, cell 2</td> <td>row 2, cell 3</td> </tr> <tr> <th bgcolor="#87CEFA">8765</th> <td>row 2, cell 2</td> <td>row 2, cell 3</td> </tr> <tr></table>' 
); 
$msg->send();

來源

2013-08-12 ramki067

我建議你看看[模板工具包]（http://template-toolkit.org/）。 –

Perl不會在單引號字符串內插入變量。

用途：

雙引號的字符串
其中一個替代語法的雙引號中的字符串，如qq[...]
一個適當的模板系統

來源

2013-08-12 06:58:14 Quentin

謝謝。當我用作「$ astatus」時，perl將它打印出來！當數據被用作引號Data =>「xxx」時，我得到語法錯誤。 – ramki067

謝謝昆汀。它使用qq（）。我是否也知道如何在我的代碼中使用html表格中的if else語句？ – ramki067

如果你想要那麼多的邏輯，那麼使用一個真正的模板語言。 Template-Toolkit是事實上的標準。 – Quentin

如何在perl html表中顯示值？

回答

相關問題