Select Code to Download

print cmpHtml(
    '<p><font foo="bar" bar="1">bar 1</font></p>',
    '<p><font bar="2" foo="bar">bar 1</font></p>'
);

print cmpHtmlElt ($elt1, $elt2);

sub cmpHtml {
    my ($html1, $html2) = @_;
...
        return $cmp if $cmp;
    }
}