my $soap2 = SOAP::Lite->uri( $_[1] )->proxy( $_[2] )->getLicenseInfo();

   my @licenseInfos = $soap2->result ;
   for ( my $i = 0 ; $i < @licenseInfos ; $i++ ) {
        my $license = $licenseInfos[$i];

         print Dumper($license);

         my $licensedCustomer = $license->{'customerName'};
         print "$licensedCustomer\n";

         my $maxEngine = $license->{'properties'}->{'maxEngines'};
         print "$maxEngine\n";

        }