Select Code to Download

sub html_trim {
    my $elem = shift;
...
for my $elem ($xhtml->findnodes('//div/ul/li')) {
    html_trim($elem)
}