gpt4 book ai didi

perl - 在 Perl 中美化/美化 HTML

转载 作者:行者123 更新时间:2023-12-02 09:33:58 26 4
gpt4 key购买 nike

我有一些 HTML 输出位于我想美化/美化的变量中,但努力从我的网络搜索结果中理解。

我发现的大多数选项,例如 PerlTidy(甚至不确定它是否是正确的选项)似乎都假设 HTML 在一个文件中,但在我的情况下,它已被放在一个 Perl 脚本中并存储在一个变量中我只是想通过删除多余的换行符和缩进来解决这个问题,然后在发送到输出之前将其保存到另一个变量。

寻找类似的东西

$output= SomePerlModule::Prettify($HTML);

我希望可以将其添加到我的现有脚本中。

如果它还可以删除孤立的结束标签,那将是一个奖励。基本上,我有一些结束标签,比如没有开始标签,虽然浏览器似乎能够处理这个问题,但最好把它们去掉。

有这样的模块吗?

最佳答案

HTML::Tidy正是这样做的:

#!/usr/bin/perl
use strict;
use warnings;

use HTML::Tidy;

my $str = '<div><p>Text<h2>Heading</h2>';
my $tidy = 'HTML::Tidy'->new;
print $tidy->clean($str);

输出
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 3.2//EN">
<html>
<head>
<meta name="generator" content="tidyp for Linux (v1.04), see www.w3.org">
<title></title>
</head>
<body>
<div>
<p>Text</p>
<h2>Heading</h2>
</div>
</body>
</html>

关于perl - 在 Perl 中美化/美化 HTML,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/29316121/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com