Select Code to Download

<?xml version="1.0"?>
<root xmlns:foo="http://foo"><parent><foo:child/></parent></root>

use strict;
use warnings;
...
my $c = $p->addChild(  $d->createElement( q{foo:child} )  );

printf qq{child->prefix=%s, child->localname=%s\n}, $c->prefix, $c->lo
+calname;

$c->setAttribute( q{foo:abc}, q{123} );
my $an = $c->getAttributeNode( q{foo:abc} );
printf qq{an->prefix=%s, an->name=%s\n}, $an->prefix, $an->name;