use SOAP::Lite;
  print SOAP::Lite
    -> uri('http://localhost/')
    -> proxy('http://localhost::9091')
    -> hi()
    -> result;