comment on

Good morning Monks

I have been trying to write a client to access a soap server for a job and am very new to Perl and SOAP. I have been given the following information from the server and need to write a client for it. If someone use their vast knowledge to help me access the first function then I am sure I can take the rest :)

 SOAP 1.1 
HTTP/1.1 200 OK 
Content-Type: text/xml; charset=utf-8 
Content-Length: length 
 
<?xml version="1.0" encoding="utf-8"?> 
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
xmlns:xsd="http://www.w3.org/2001/XMLSchema" 
xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"> 
 <soap:Body> 
 <getCardInfoResponse xmlns="http://www.designa.de/"> 
 <getCardInfoResult> 
 <AmountPayed>int</AmountPayed> 
 <AmountDue>int</AmountDue> 
 <AmountDueCurrency>decimal</AmountDueCurrency> 
 <AmountDuePeriodStart>dateTime</AmountDuePeriodStart> 
 <AmountDuePeriodEnd>dateTime</AmountDuePeriodEnd> 
 <CardUID>guid</CardUID> 
 <ISONumber>string</ISONumber> 
 <CardType>int</CardType> 
 <CarparkUID>guid</CarparkUID> 
 <CarparkNr>int</CarparkNr> 
 <CodingTime>dateTime</CodingTime>
 <LastTccNumber>int</LastTccNumber> 
 <LastTccTime>dateTime</LastTccTime> 
 <NumberOfPayments>int</NumberOfPayments> 
 <GracePeriod>int</GracePeriod> 
 <VAT>int</VAT> 
 <MoneyConversionFactor>decimal</MoneyConversionFactor> 
 <Currency>string</Currency> 
 <Cheater>boolean</Cheater> 
 <RabattInfo> 
 <Wert>int</Wert> 
 <Zeit>int</Zeit> 
 <Promille>int</Promille> 
 <PromilleGeb>int</PromilleGeb> 
 <GID>int</GID> 
 <NullUntil>int</NullUntil> 
 <CaOrder>string</CaOrder> 
 <WertVerr>int</WertVerr> 
 <ZeitVerr>int</ZeitVerr> 
 <RabattBetragAbsolut>int</RabattBetragAbsolut> 
 </RabattInfo> 
 </getCardInfoResult> 
 </getCardInfoResponse> 
 </soap:Body> 
</soap:Envelope> 
 
 SOAP 1.2 
HTTP/1.1 200 OK 
Content-Type: application/soap+xml; charset=utf-8 
Content-Length: length 
 
<?xml version="1.0" encoding="utf-8"?> 
<soap12:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+ 
xmlns:xsd="http://www.w3.org/2001/XMLSchema" 
xmlns:soap12="http://www.w3.org/2003/05/soap-envelope"> 
 <soap12:Body> 
 <getCardInfoResponse xmlns="http://www.designa.de/"> 
 <getCardInfoResult> 
 <AmountPayed>int</AmountPayed> 
 <AmountDue>int</AmountDue> 
 <AmountDueCurrency>decimal</AmountDueCurrency> 
 <AmountDuePeriodStart>dateTime</AmountDuePeriodStart> 
 <AmountDuePeriodEnd>dateTime</AmountDuePeriodEnd> 
 <CardUID>guid</CardUID> 
 <ISONumber>string</ISONumber> 
 <CardType>int</CardType> 
 <CarparkUID>guid</CarparkUID> 
 <CarparkNr>int</CarparkNr> 
 <CodingTime>dateTime</CodingTime> 
 <LastTccNumber>int</LastTccNumber> 
 <LastTccTime>dateTime</LastTccTime> 
 <NumberOfPayments>int</NumberOfPayments> 
 <GracePeriod>int</GracePeriod> 
 <VAT>int</VAT> 
 <MoneyConversionFactor>decimal</MoneyConversionFactor> 
 <Currency>string</Currency> 
 <Cheater>boolean</Cheater> 
 <RabattInfo> 
 <Wert>int</Wert> 
 <Zeit>int</Zeit> 
 <Promille>int</Promille> 
 <PromilleGeb>int</PromilleGeb> 
 <GID>int</GID> 
 <NullUntil>int</NullUntil> 
 <CaOrder>string</CaOrder> 
 <WertVerr>int</WertVerr> 
 <ZeitVerr>int</ZeitVerr> 
 <RabattBetragAbsolut>int</RabattBetragAbsolut> 
 </RabattInfo> 
 </getCardInfoResult> 
 </getCardInfoResponse> 
 </soap12:Body> 
</soap12:Envelope> 
 
 HTTP POST 
HTTP/1.1 200 OK 
Content-Type: text/xml; charset=utf-8 
Content-Length: length 
 
<?xml version="1.0" encoding="utf-8"?> 
<CardInfo xmlns="http://www.designa.de/"> 
 <AmountPayed>int</AmountPayed> 
 <AmountDue>int</AmountDue> 
 <AmountDueCurrency>decimal</AmountDueCurrency> 
 <AmountDuePeriodStart>dateTime</AmountDuePeriodStart> 
 <AmountDuePeriodEnd>dateTime</AmountDuePeriodEnd> 
 <CardUID>guid</CardUID> 
 <ISONumber>string</ISONumber> 
 <CardType>int</CardType> 
 <CarparkUID>guid</CarparkUID> 
 <CarparkNr>int</CarparkNr> 
 <CodingTime>dateTime</CodingTime> 
 <LastTccNumber>int</LastTccNumber> 
 <LastTccTime>dateTime</LastTccTime> 
 <NumberOfPayments>int</NumberOfPayments> 
 <GracePeriod>int</GracePeriod> 
 <VAT>int</VAT> 
 <MoneyConversionFactor>decimal</MoneyConversionFactor> 
 <Currency>string</Currency> 
 <Cheater>boolean</Cheater> 
 <RabattInfo> 
 <Wert>int</Wert> 
 <Zeit>int</Zeit> 
 <Promille>int</Promille> 
 <PromilleGeb>int</PromilleGeb> 
 <GID>int</GID> 
 <NullUntil>int</NullUntil> 
 <CaOrder>string</CaOrder> 
 <WertVerr>int</WertVerr> 
 <ZeitVerr>int</ZeitVerr> 
 <RabattBetragAbsolut>int</RabattBetragAbsolut> 
 </RabattInfo> 
</CardInfo>
[download]

So far I have not even been able to create the most basic connection using Perl and am a complete loss as to what to do next. Below is my code to call the method isAlive that the server also has.

 my ($isbn_number) = @ARGV;
  use SOAP::Lite +autodispatch=>
      uri=>'http://www.designa.de/', outputxml=>1,
      proxy=>'http://192.168.1.100/AbacusWebService/ServiceCashPoint.a
+smx';
  my $isbn_xml = isAlive();
  print "$isbn_xml\n";
[download]

As you can probably tell I have modified this from an example. Below is the output I get

 Use of inherited AUTOLOAD for non-method main::isAlive() is deprecate
+d at C:\Use
rs\Sam\Documents\Perl code\soap.pl line 15.
<?xml version="1.0" encoding="utf-8"?><soap:Envelope xmlns:soap="http:
+//schemas.
xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchem
+a-instance
" xmlns:xsd="http://www.w3.org/2001/XMLSchema"><soap:Body><soap:Fault>
+<faultcode
>soap:Client</faultcode><faultstring>Server did not recognize the valu
+e of HTTP
Header SOAPAction: http://www.designa.de/#isAlive.</faultstring><detai
+l /></soap
:Fault></soap:Body></soap:Envelope>
Press any key to continue . . .
[download]

In reply to SOAP::LITE client help by Wroof

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		`&`
	<		`<`
	>		`>`
	[		`[`
	]		`]`

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.