use strict;
use warnings;

use SOAP::Lite;
  print SOAP::Lite                                             
    -> uri('http://myserver.manheim.co.uk:51111/webservices/vehicle')                                             
    -> proxy('http://myserver.manheim.co.uk:51111/webservices/vehicle/soaptest.pl')
    -> hi()                                                    
    -> result;