evil perl of the day

[waider]

$out =~ s{<([^>]+)></\1>}{<$1 />}gs;

If you can figure out which switches will make XML::Simple do this automatically, please tell me, as the documentation consists of a terse statement of purpose for each option followed by a short example, neither of which is getting me around this problem.

Which is, obviously, to collapse an XML element <foo></foo> to its compressed form, <foo />.

Comments

[bitpuddle.livejournal.com]

This doesn't answer your question, but why do you care which form it is in?

[waider.livejournal.com]

It's one of those "be generous in what you accept and strict in what you produce" situations.