Select Code to Download

<?xml version="1.0" encoding="utf-8"?>
<!-- Configuration for the aero product -->
...
      <releaseTD releaseType="SVersion" releaseDelivery="Web"/>
   </releaseTypeAndDelivery>
</product>

<productName>Airtime</productName>
<licenseName>Airtime_Tool</licenseName>
<externalProductIdentifier>10</externalProductIdentifier>
<baseCode>AT</baseCode>
<product name =aero>

my $xmldata= XMLin($filename);
        foreach my $licenseName (keys %{$xmldata->{licenseName}}) {
        print $licenseName . ' is ' . $xmldata->{basecode}->{$basecode
+} . $xmldata->{externalProductIdentifier}->{$externalProductIdentifie
+r} . "\n";
        }