Help for this page

Select Code to Download

Select or download this

if ( $d->isAttributeNode ) {
    print qq(D=\n);
    print $d->string_value;
}