Airtime Airtime_Tool 10 AT true all #### Airtime Airtime_Tool 10 AT #### my $xmldata= XMLin($filename); foreach my $licenseName (keys %{$xmldata->{licenseName}}) { print $licenseName . ' is ' . $xmldata->{basecode}->{$basecode} . $xmldata->{externalProductIdentifier}->{$externalProductIdentifier} . "\n"; }