---------- perl compile ----------
<enhancement>
  <descriptorgroup>
    <descriptors controlled="y" type="DRG">
      <mainterm weight="a">aspirin</mainterm>
      <mainterm>panadol</mainterm>
      <mainterm>xenon</mainterm>
      <mainterm weight="a">zorro</mainterm>
    </descriptors>
    <descriptors controlled="y" type="MED">
      <descriptor>
        <mainterm weight="a">plague</mainterm>
        <mainterm>disease</mainterm>
        <mainterm>pestilence</mainterm>
      </descriptor>
    </descriptors>
  </descriptorgroup>
</enhancement>

Output completed (3 sec consumed) - Normal Termination