| Server IP : 74.208.236.79 / Your IP : 216.73.217.111 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/COM/ |
Upload File : |
#!/usr/bin/perl -w
#!d:\perl\bin\perl.exe
# -- SOAP::Lite -- soaplite.com -- Copyright (C) 2001 Paul Kulchenko --
use Win32::OLE;
$soap = Win32::OLE->CreateObject('SOAP.Lite')->new
or die "SOAP::Lite for COM is not installed";
$soap->proxy('http://localhost/')
->uri('http://www.soaplite.com/My/Examples');
print $soap->getStateName(shift || 25)->result;