- or download this
#!/usr/bin/perl
use warnings;
...
$li_node->removeChild( $p_element );
print $doc->toString;
- or download this
<?xml version="1.0" encoding="utf-8"?>
<li>
<p>
Some <b>text<c1> here</c1></b>
</p>
</li>
- or download this
<?xml version="1.0" encoding="utf-8"?>
<li>
Some <b>text<c1> here</c1></b>
</li>