如何使用Perl在瀏覽器上保存的格式顯示文件的內容CGI

我有一個文本文件保存在服務器端。我必須讀取文件並使用perl CGI將其內容顯示到瀏覽器中。該文件有幾個段落，換行符和製表符。我想保留這些格式。目前該文件的內容被顯示，但它被全部混亂成一個連續的段落。如何使用Perl在瀏覽器上保存的格式顯示文件的內容CGI

print "<table border='1'>\n"; 
    print "<tr>\n"; 
    print "<td><b>Whole Report</b></td>\n"; 
    print "</tr>\n"; 
    print "<tr>\n"; 
    print "<td>$entireReport</td>\n"; 
    print "</tr>\n"; 
    print "</table>\n";

在上面的代碼中，我正在將文件的全部內容讀入變量$ entireReport。

由於

來源

2013-04-29 user466663

簡單的選項是使用'

'與平常的轉義。否則，您需要確定段落和縮進並用HTML/CSS重新創建它們。 – ikegami 2013-04-29 03:23:51

感謝ikegami，它像一個魅力工作！非常感謝！！但我沒有看到一個地方接受這個答案。 – user466663 2013-04-29 03:28:31

可能有一個現有的[模塊]（http://search.cpan.org/）來做到這一點。我不知道。 – ikegami 2013-04-29 03:30:12

包裹在一個<PRE> </PRE >標籤的代碼。假設你有$ fileContents中的內容，然後使用：

print "<td><pre>", CGI::escapeHTML($fileContents), "</pre></td>\n";

這將保持文件逐字格式化。

--dmg

來源

2013-04-29 21:28:03 dmg

如何使用Perl在瀏覽器上保存的格式顯示文件的內容CGI

回答

相關問題