print SOAP::Lite
  -> proxy('http://homepages.feis.herts.ac.uk/~123456/cgi-bin/policy.c
+gi')
  -> uri('urn:policy')
  -> checkPolicyPrice($policyCode,$date)
  -> result;


##</code><code>##

use Carp;
my $s = new SOAP::Lite +trace; # not sure if this goes on the use statement or the optional constructor method
$s->proxy('http://homepages.feis.herts.ac.uk/~123456/cgi-bin/policy.c
+gi') or confess;
$s-> uri('urn:policy') or confess;
$s-> checkPolicyPrice($policyCode,$date) or confess;
my $output = $s-> result or confess;
print $output;