XML, the Perl way