use SOAP::Lite;

  print SOAP::Lite
    -> proxy('http://my.proxy.server/')
    -> service('http://www.xmethods.net/sd/StockQuoteService.wsdl')
    -> getQuote('MSFT');