use SOAP::Lite;
my $response = SOAP::Lite
     -> uri('urn:xmethods-delayed-quotes')
     -> proxy('http://services.xmethods.net/soap');
print "Google price is: ", $response->getQuote('GOOG')->result, "\n";