| Server IP : 74.208.236.79 / Your IP : 216.73.217.104 Web Server : Apache System : Linux infongp-us50 4.4.400-icpu-108 #2 SMP Wed Feb 11 10:12:42 UTC 2026 x86_64 User : u93192080 ( 6162215) PHP Version : 8.4.22 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /kunden/usr/share/doc/libsoap-lite-perl/examples/ |
Upload File : |
#!/usr/bin/perl -w
#!d:\perl\bin\perl.exe
# -- SOAP::Lite -- soaplite.com -- Copyright (C) 2001 Paul Kulchenko --
# example for Weblogs SOAP interface (http://www.soapware.org/weblogsCom)
use SOAP::Lite;
my $weblogs = SOAP::Lite
-> proxy("http://rpc.weblogs.com/weblogUpdates")
-> on_action(sub{'"/weblogUpdates"'});
print $weblogs->ping(
SOAP::Data->name(weblogname=>'Scripting News'),
SOAP::Data->name(weblogurl=>'http://www.scripting.com/'),
)->result->{message};