[Xml-compile] error parsing WSDL (smaller send)

[gstewart]

lol, please disregard last.

Here's what I'm trying:

use XML::Compile::WSDL11;      # use WSDL version 1.1
use XML::Compile::SOAP11;      # use SOAP version 1.1
use XML::Compile::Transport::SOAPHTTP;
use LWP::UserAgent;

my $browser =3D LWP::UserAgent->new();
my $wsdl_data =3D $browser->get("https://1.2.3.4/services/fwif?wsdl");
my $schema_data =3D $browser->get("https://1.2.3.4/services/ninjaprobe.xsd"=
);


my $wsdl =3D XML::Compile::WSDL11->new($wsdl_data->content);
$wsdl->importDefinitions($schema_data->content);

my $call =3D $wsdl->compileClient('VersionQuery');
my $answer =3D $call->();

...and the response:

Use of uninitialized value in join or string at
/Library/Perl/5.12/XML/Compile/Translate/Writer.pm line 514.
Use of uninitialized value in subroutine entry at
/Library/Perl/5.12/XML/Compile/Translate/Writer.pm line 469.
Can't use string ("") as a subroutine ref while "strict refs" in use at
/Library/Perl/5.12/XML/Compile/Translate/Writer.pm line 469.

On Mon, Aug 27, 2012 at 11:45 AM, gstewart <gstewart at gmail.com> wrote:

> Ok, so when I try something like this:
>
> my $soap =3D SOAP::WSDL->new(wsdl =3D> 'https://1.2.3.4/services/fwif?wsd=
l');
> my $result =3D $soap->call('NICList');
> print $result."\n";
>
> Server returns:
>
> HTTP/1.1 500 Internal Server Error
> Date: Mon, 27 Aug 2012 18:43:48 GMT
> Server: Axis2C/1.6.0 (Simple Axis2 HTTP Server)
> Content-Type: text/xml;charset=3DUTF-8
> Content-Length: 249
> Connection: close
>
> <soapenv:Envelope xmlns:soapenv=3D"http://schemas.xmlsoap.org/soap/envelo=
pe/"><soapenv:Body><soapenv:Fault><faultcode>soapenv:Client</faultcode><fau=
ltstring>Array
> list index out of
> bounds</faultstring></soapenv:Fault></soapenv:Body></soapenv:Envelope>
>
> My apologies, at this point it's likely my remedial understanding of the
> correct way to send the correct query. Any pointers would be very
> appreciated.
>
> Graeme
>
> On Mon, Aug 27, 2012 at 8:02 AM, Mark Overmeer <website at craneveer.nl>wrot=
e:
>
>> * gstewart (gstewart at gmail.com) [120823 17:50]:
>> > I'm making pathetic attempts to leverage a SOAP/WSDL interface to a 3rd
>> > party system using Perl and XML::Compile.
>> >
>> > Use of uninitialized value in join or string at
>> > /Library/Perl/5.12/XML/Compile/Translate/Writer.pm line 514.
>>
>> These are only warnings.  Does the application work?
>>
>> I have figured-out what is happening.  Your schema has constructs like
>>
>>    <element name=3D"HLBListAll" type=3D"ens:Empty" nillable=3D"true"></e=
lement>
>>
>>    <complexType name=3D"Empty"/>
>>
>> The complex cannot be more empty than this ;-)
>> Something is wrong for the combination of "nillible" with an empty
>> complexType.  This is a bug.  Fixed when I find it ;-)
>> --
>> Regards,
>>                MarkOv
>>
>> ------------------------------------------------------------------------
>>        Mark Overmeer MSc                                MARKOV Solutions
>>        Mark at Overmeer.net                          solutions at overmeer.net
>> http://Mark.Overmeer.net                   http://solutions.overmeer.net
>>
>>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.scsys.co.uk/pipermail/xml-compile/attachments/20120827/5b=
89367f/attachment.htm