sub cmpHtml {
    ...

    my $cmp = cmpHtmlElt ($root1, $root2);

    $_->delete for $root1, $root2;

    return $cmp;
}

##</code><code>##

$cmp = EXPR;
return $cmp if $cmp;

##</code><code>##

{ return EXPR || next }