Re^2: Add attribute to xml with XML::LibXML

FYI, if your version of XML::LibXML is vaguely recent (since 1.9x), then this:

$node->setAttribute( 'type',
        $newtypes{$node->getAttribute('name')} );
[download]

Can be written as:

$node->{type} = $newtypes{ $node->{name} };
[download]

That is, XML::LibXML::Element acts like a hashref, and you can get/set attributes that way.

package Cow { use Moo; has name => (is => 'lazy', default => sub { 'Mooington' }) } say Cow->new->name

Comment on Re^2: Add attribute to xml with XML::LibXML Select or Download Code