#!/usr/bin/perl

use SOAP::Lite;

my $soap = SOAP::Lite
  -> proxy('http://localhost:8082/axis/HelloServer.jws')
  -> uri('urn:HelloServer')
  -> sayHelloTo("Tim O'Reilly")
  -> result;

print "$soap\n";

Technically, that's two lines of code. Note that the endpoint address is just in the SOAP::Lite constructor.