rajmonks has asked for the wisdom of the Perl Monks concerning the following question:

Is there any one plese suggest how to pass the value in dot net web service. Am getting error "500 Internal Server Error "
use MIME::Base64; use Frontier::Client; use warnings; =head a.txt file contains <PDFExsists> <UniqueID>202775</UniqueID> <Queryexsists>false</Queryexsists> <XMLExsists>false</XMLExsists> <MMCExsists>false</MMCExsists> <Illustexsists>false</Illustexsists> <Pdfexsists>false</Pdfexsists> <MMC>0</MMC> <BID>202775</BID> <Filename>6041_No3.xml</Filename> <Versionno>6041</Versionno> <Duedate>2008-07-16T00:00:00</Duedate> <Recdate>2008-07-16T14:47:37</Recdate> <Stage>S200</Stage> <Aid>6041</Aid> <Jid>JBMT</Jid> </PDFExsists> =cut $text='D:\raj\service\a.txt'; open (IN,"<$text") || die "Unable to open the input file"; binmode IN; undef $/; $filecontent = <IN>; $encoded = encode_base64($filecontent); close IN; my $url = "http://10.0.6.78/pdf%20service/service.asmx"; my @args = ($ARGV[0], $encoded); my $client = new Frontier::Client( url => $url, debug => 0); print $client->call('SetItemsPDF',@args);

Replies are listed 'Best First'.
Re: Webservice update
by moritz (Cardinal) on Jul 17, 2008 at 15:23 UTC
    Am getting error "500 Internal Server Error "

    So take a look in your server's error.log file, it contains more information that ease debugging.

Re: Webservice update
by olus (Curate) on Jul 17, 2008 at 16:12 UTC

    Usually .net web-service implementations don't like xml-rpc encoding. They like document literal contract types. If that web-service provides you with a WSDL, you could try a SOAP::Lite approach.