Re: Replacing an HTML element with multiple elements using HTML::TreeBuilder

[tangent]

Not sure if I understand your requirements fully, but this works for me:

for my $p ($xhtml->findnodes('//blockquote/p')) {

    my $text = $p->as_text();
    $text =~ s/^\s+//;
    $text =~ s/\s+$//;

    if ( $text =~/\n\s*\n\s*/ ) {
        my @paragraphs = split(/\s*\n\s*/, $text);
        my @new_elems;
        for my $para (@paragraphs) {
            my $new = HTML::Element->new('p');
            $new->push_content($para);
            push(@new_elems, $new);
        }
        $p->replace_with(@new_elems);
    }
}

[mldvx4]

Thanks. I had tried several approaches using replace_with, but each met with various kinds of failure. Your example works and gives me a bit more of an idea how to use the methods.