sub changePkg {
        my ($username, $pkg) = @_;
                
        my $client = connectXrc();

        my $result = $client->setUserOffers(
                XRC_CLIENTID,
                $username,
                $pkg);
}

##</code><code>##

<wsdl:message name="setUserOffersRequest">
  <wsdl:part name="clientID" type="xs:int"/>
  <wsdl:part name="username" type="xs:string"/>
  <wsdl:part name="offerIDs" type="types:ArrayOfInt"/>
</wsdl:message>

##</code><code>##

<xs:complexType name="ArrayOfInt">
  <xs:annotation><![CDATA[
    A SOAP encoded array of the xs:int type.
  ]]></xs:annotation>
  <xs:complexContent>
    <xs:restriction base="soapenc:Array">
      <xs:attribute ref="soapenc:arrayType" wsdl:arrayType="xs:int[]"/>
    </xs:restriction>
  </xs:complexContent>
</xs:complexType>

##</code><code>##

my @pkg = 5544;

print "username: ";
my $username = <STDIN>;
chomp($username);

XRC::changePkg($username, @pkg);

##</code><code>##

<offerIDs xsi:type="types:ArrayOfInt">5544</offerIDs>

##</code><code>##

<faultstring>org.xml.sax.SAXException: Found character data inside an array element while deserializing</faultstring>