Wer HTML::Parser nutzt, um XHTML neu zu schrieben, wurdert sich manchmal, wenn in der Quelle Elemente und Attribute in erlaubter Groß-/CamelCase-Schreibung sind, dass das Ergebnis immer kleinbuchstaben sind.

Einfach noch beim Parser-Handle was hinzufügen:
$p->case_sensitive(1); # weil sonst HTML-Elemente in kleinschrift sind!!!