如何使用Perl CGI显示在浏览器上保留格式的文件内容

时间:2013-04-29 02:48:18

标签: html perl formatting 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";

在上面的代码中,我正在将文件的整个内容读入变量$ wholeReport。

由于

1 个答案:

答案 0 :(得分:1)

将代码包装在&lt; PRE&gt;&lt; / PRE&gt;中标签。假设你有$ fileContents中的内容,然后使用:

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

这会将格式保留在文件中。

- DMG