#!perl -w

# -- SOAP::Lite -- guide.soaplite.com -- Copyright (C) 2001 Paul Kulchenko --

use SOAP::Lite;

print SOAP::Lite
  -> uri('http://www.soaplite.com/My/Examples') 

  -> proxy('http://soaplite:authtest@services.soaplite.com/auth/examples.cgi')

  -> getStateName(21)
  -> result;