HTML :: Element - >用新的HTML替換文本節點::元素

Question

如何用HTML :: Element中的新<p>test</p>替換文本節點？

在此先感謝。

Answer 1

這是麥Killbers自己的答案，從他的問題撕開其所屬的地方：

---

===回答我的問題===

$ele->objectify_text(); 
    my @childNodes = $ele->content_list(); 
    for(my $j=0; $j < scalar(@childNodes); $j++) { 
     my $childNode = $childNodes[$j]; 
     if (ref($childNode) && ($childNode->tag() eq '~text')) { #TEXTNODE 
      my $newElement = HTML::Element->new('p'); 
      $newElement->push_content($childNode->attr('text')); 
      $childNode->replace_with($newElement)->delete(); 
     } 
    } 
    $ele->deobjectify_text();