SOAP::Lite getting this error when invoking a soap method "CircuitDesignId can not be null or 0 or an empty list." but works find if invoked from soapui with this xml below is soapui xml and code

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envel
+ope/" xmlns:mis="http://www.paetec.com/oss/misis/" xmlns:sch="http://
+www.paetec.com/oss/misis/schema">
   <soapenv:Header/>
   <soapenv:Body>
      <mis:RequestCircuitInfoByCircuitDesignIdRequest>
         <sch:UserId>xxx</sch:UserId>
         <!--Optional:-->
         <sch:Type>?</sch:Type>
         <!--Zero or more repetitions:-->
         <sch:SubType>CONTACTMASTERINFO</sch:SubType>
         <!--1 or more repetitions:-->
         <sch:CircuitDesignId>5633874</sch:CircuitDesignId>
      </mis:RequestCircuitInfoByCircuitDesignIdRequest>
   </soapenv:Body>
</soapenv:Envelope>

here is the code
#!/usr/bin/perl -w

use SOAP::Lite;
my $soap = SOAP::Lite->new( proxy => 'http://<xxx out for security>:80
+80/axis2MISIS/services/misis/');
$soap->readable(1);
# $soap->default_ns('urn:RequestCircuitInfoByCircuitDesignId');
my $som = $soap->call('RequestCircuitInfoByCircuitDesignId',    
   SOAP::Data->name('UserId')->value('xxx'),
   SOAP::Data->name('SubType')->value('CONTACTMASTERINFO'),   
   SOAP::Data->name('CircuitDesignId')->value(5633874)->type('long'));
+   
die $som->faultstring if ($som->fault); 
$tmp = $som->result;
print "$tmp\n"; 
print "";
[download]