Help for this page

Select Code to Download


  1. or download this
    use XML::LibXML;
    
    my $parser = XML::LibXML->new();
    ...
            <pd_name>Not Visible</pd_name>
            <dev_name>0040</dev_name>
    # ...
    
  2. or download this
    for my $node ( $root->findnodes("//Device/*") )
    {
        print $node->nodeName, $/;
    }