如何使用 Perl 将文件转换为 HTML 表格？答案

【问题标题】：How can I convert a file to an HTML table using Perl?如何使用 Perl 将文件转换为 HTML 表格？
【发布时间】：2017-05-20 21:41:06
【问题描述】：

我正在尝试编写一个简单的 Perl CGI 脚本：

运行 CLI 脚本
读取生成的 .out 文件并将文件中的数据转换为 HTML 表格。

以下是 .out 文件中的一些示例数据：

 10.255.202.1   2472327594  1720341
 10.255.202.21   2161941840  1484352
  10.255.200.0   1642646268  1163742
 10.255.200.96   1489876452  1023546
 10.255.200.26   1289738466   927513
 10.255.202.18   1028316222   706959
 10.255.200.36    955477836   703926

任何帮助将不胜感激。

【问题讨论】：

到目前为止你有什么，它怎么不工作？

标签： html perl

【解决方案1】：

以下内容未经测试，可能需要大量打磨但它给出了一个粗略的想法：

use CGI qw/:standard *table/;

print
  start_html('clicommand results'),
  start_table;

open(my $csvh, 'clicommand |');

while (<$csvh>) {
   print Tr(map { td($_) } split);
}

close($csvh);

print
  end_table,
  end_html;

【讨论】：

作为一般规则，您应该在输出字符串之前对任何 HTML 元字符进行编码（例如 &lt; -> &lt;）。试试 HTML::Entities::encode_entities。
太好了，谢谢，我会试试看。不，这不是家庭作业，只是我正在做的一个小项目，我真的不知道 Perl :)

【解决方案2】：

这并不能直接回答您的问题，但是可以改用 AWK 吗？包装整个内容应该不会太难，然后用适当的html标签将每个列条目创建一个基本表格。

【讨论】：

是的，可以使用任何图灵完备的语言来完成这项任务。虽然恕我直言，这种文本处理任务正好在 Perl 的驾驶室中。

【解决方案3】：

您很可能希望通过使用 CSS 样式表或向表格添加边框来使 HTML 更漂亮，但这是一个简单的开始。

#!/usr/bin/perl

use strict;
use warnings;

my $output = `cat dat`;
my @lines  = split /\n/, $output;

my @data;
foreach my $line (@lines) {
    chomp $line;
    my @d = split /\s+/, $line;
    push @data, \@d;
}

print <<HEADER;
<html>
<table>
HEADER

foreach my $d (@data) {
    print "\t", "<tr>";
    print map { "<td>$_</td>" } @$d;
    print "</tr>", "\n";
}

print <<FOOTER;
</table>
</html>
FOOTER

这会产生以下输出：

<html>
<table>
        <tr><td>10.255.202.1</td><td>2472327594</td><td>1720341</td></tr>
        <tr><td>10.255.202.21</td><td>2161941840</td><td>1484352</td></tr>
        <tr><td>10.255.200.0</td><td>1642646268</td><td>1163742</td></tr>
        <tr><td>10.255.200.96</td><td>1489876452</td><td>1023546</td></tr>
        <tr><td>10.255.200.26</td><td>1289738466</td><td>927513</td></tr>
        <tr><td>10.255.202.18</td><td>1028316222</td><td>706959</td></tr>
        <tr><td>10.255.200.36</td><td>955477836</td><td>703926</td></tr>
</table>
</html>

要了解如何修改 HTML 表格的外观，w3schools website entry on the table tag 是一个好的开始。

【讨论】：