Select Code to Download

#!/usr/bin/perl -w

...
$xml->parsefile('info.xml');

$xml->parse('<attribute Name="Column_Type" >F635 Median</attribute>');

  \\ ()
entries || #10;
...
entries enumeration attribute || -
entries enumeration //
entries //

<?xml version="1.0" encoding="UTF-8"?>
<entries>
...
            <attribute Name="F635 Median" >389</attribute>
            <attribute Name="B635 Median" >115</attribute></enumeratio
+n>
</entries>