如何在Perl中修改本地HTML文件？

Question

是否有CPAN模塊或代碼段，可用於在不使用regExp的情況下修改本地HTML文件？

我想做的事 ：

1. 更改開始標記（例如： <div>到<div id="newtag"> ）
2. 在另一個標簽之前添加標簽（例如： </head>到<script type="text/javascript"> ...</script></head>
3. 移除標簽
4. 讀取給定標簽的內容。 （<-好的，可以使用XML / HTML解析器來完成。

Answer 1

如果您擁有HTML，而沒有XHTML，則您不想使用XML解析器。

HTML :: Parser是Perl的標准HTML解析器。 幾乎所有其他內容都建立在其之上。

HTML :: TokeParser是HTML :: Parser的替代接口。 它按需返回內容，而不是將所有內容傳遞給回調。

HTML :: TreeBuilder從HTML構建類似DOM的樹，然后可以對其進行修改。

HTML :: TreeBuilder :: XPath擴展了具有XPath支持的HTML :: TreeBuilder。

HTML :: Query通過類似jQuery的選擇器擴展了HTML :: TreeBuilder。

pQuery是另一個模塊，它為HTML :: TreeBuilder提供了更完整的jQuery兼容性。

Answer 2

CPAN

• XML :: XPATH
• XML :: Xerces

一個簡單的CPAN搜索返回

• XML搜索

XPATH

• XPATH教程

聽起來您不熟悉XPath。 這是一個使您熟悉的快速教程。 它不是Perl，但將解釋概念。