Select Code to Download

<comp id="GWBC18827">
<nam type="preferred">NAD(P)H</nam>
...
<ref name="Klotho">KLM0000285</ref>
<ref name="Kegg">C00004</ref>
</comp>

use XML::Parser;

...
  
  print "cdata: $data\n";
}