1#!perl -w
2#!d:\perl\bin\perl.exe
3
4# -- SOAP::Lite -- soaplite.com -- Copyright (C) 2001 Paul Kulchenko --
5
6use SOAP::Lite;
7
8# object interface
9# WSDL with <import> element and multiple ports (non-SOAP bindings)
10print SOAP::Lite
11  -> service('http://www.xmethods.net/sd/StockQuoteImport.wsdl')
12  -> getQuote('MSFT'), "\n";
13