如何用Perl刪除特定的HTML <table>？

Question

我需要根據表格內容刪除某些表格。我使用HTML::Tree解析了HTML以構建HTML樹。

我使用replace_with_content來刪除表，但只刪除表標記並保留表的內容。

請注意，表格是嵌套的。

my $content = get($url); 

my $tree = HTML::Tree->new(); 
$tree->parse($content); 

my (@table_tags) = $tree->look_down('_tag' , 'table'); 
my $string = $table_tags[0]->as_HTML; 

my $tree2 = HTML::Tree->new(); 
$tree2->parse($string); 

my (@table_tags2) = $tree2->look_down('_tag' , 'table'); 
$table_tags2[3]->replace_with_content(); 

Answer 1

怎麼樣使用delete代替replace_with_content？

Answer 2

要刪除你想有一個表只

$table->delete; 

我不知道，如果你有選擇的表中刪除的問題，而是你怎麼做這取決於條件是什麼。 HTML::Element中的方法將允許您導航樹並測試其中的一部分，或者您可以添加條件給您的電話look_down