Thread SOAP::Lite ... wieso gehts nicht?: Hab hier ein Anfängerproblem (glaub ich)
(3 answers)
Opened by Hopse at 2003-11-04 04:03
Hallo erstmal
Ich muss mich in SOAP::Lite einarbeiten und habe unter anderem diesen Beispielscode gefunden. Aber ich bring das nicht zum laufen, nun weiss ich nicht warum. Echo.pm #!/usr/bin/perl # Dateiname: Echo.pm # Echo-Web Service Perl-Modul - an dieses Modul werden # Requests an den Echo-Web Service gesendet. # Autor: Byrne Reese package Echo; use strict; sub echo { my ($self,@args) = @_; return join(",",@args); } 1; Echo.cgi #!/usr/bin/perl -w # Dateiname: echo.cgi # Echo-Web Service - dieser Web Service gibt jeden Input # als Echo in seiner Antwort zurück. # Autor: Byrne Reese use Echo; use SOAP::Transport::HTTP; SOAP::Transport::HTTP::CGI ->dispatch_to(&â²Echo&â²) ->handle; echo_client.pl #!/usr/bin/perl -w # Dateiname: echo_client.pl # Client zum Versenden einer Nachricht an den Echo-Web Service # Autor: Byrne Reese byrne@majordojo.com # Verwendung: # echo_client.pl ########################################### use SOAP::Lite; # +trace => &â²debug&â²; $HOST = "http://offline.myserver.de/cgi-bin/Echo/Echo.cgi"; $NS = "urn:echo"; $PHRASE = "seppl" . shift; # von der Kommandozeile lesen my $soap = SOAP::Lite ->readable(1) ->uri($NS) ->proxy($HOST); my $som = $soap->echo( SOAP::Data->name("whatToEcho" => "$PHRASE")); print "Die Antwort vom Server:\n".$som->result."\n"; 1; bei my $som =$soap->echo... , also wenn ich echo aus der Echo.pm aufrufen will fängt er an zu meckern mit 400 URL missing. Der code ist auf einem Linux-Rechner im cgi-bin installiert. Was kann/muss ich machen, daà der Aufruf funktioniert? Vielen Dank schon mal im voraus |