CUFP
merlyn
snippet
<div class="Description">Turn messy HTML into standards-compliant HTML with all close tags properly noted. Takes <tt>STDIN</tt>, or a list of files, and result goes on <tt>STDOUT</tt>.</div>
<CODE>
#!/usr/bin/perl
use XML::LibXML;
print XML::LibXML->new->parse_html_string(join "", <>)->toStringHTML;
</CODE>