html - 如何对作为 perl 脚本响应返回的数据进行对齐

Question

我正在对 perl 脚本进行 Jquery-Ajax 调用以获取一些数据。Perl 脚本将进行数据库查询并将数据返回到 HTML 页面。

while (my @data = $statement->fetchrow_array())
{
    print "$data[6]  $data[3]  $data[5]";
    print "<br>";
}

返回的数据以粘合形式呈现在 HTML 页面中。我想以某种对齐形式显示数据。的最大长度data[6]可以是20。和 10 10 其他两个。

我怎样才能做到这一点？任何帮助将不胜感激。

Answer 1

正如mpapec所建议的：

print "<table>\n";
while (my @data = $statement->fetchrow_array()) {
    print "\t<tr>\n";
    print "\t\t<td>$_</td>\n" foreach ($data[6], $data[3], $data[5]);
    print "\t</tr>\n";
}
print "</table>\n";