Practical Perl Tools: Taking the XPath Less Traveled