Perl的HTML ::元素 - 傾銷只是後人的HTML

Question

遇到麻煩試圖輸出匹配節點的內容是我解析：

<div class="description">some text <br/>more text<br/></div> 

我使用HTML::TreeBuilder::XPath找到節點（只有一個div使用該班）：

my $description = $tree->findnodes('//div[@class="description"]')->[0]; 

它發現節點（返回爲HTML::Element我相信），但$description->as_HTML包括元素本身太 - 我只想包含在元素中的HTML一切：

some text <br/>more text<br/> 

我明顯可以正則表達式剝離出來，但感覺凌亂，我敢肯定我只是缺少一個函數的地方去做？

Answer 1

嘗試這樣做：

my $description = $tree->findnodes('//div[@class="description"]/text()')->[0]; 

這是一個Xpath的伎倆。

Answer 2

使用./node()來獲取包括文本和元素的所有子節點。

my $description = $tree->findnodes('//div[@class="description"]/node()');