Help for this page

Select Code to Download


  1. or download this
    package policy;
    
    ...
    
        return $result;
    }
    
  2. or download this
    #!/usr/bin/perl -w
    # test-policy.pl
    ...
      -> uri('urn:policy')
      -> checkPolicyPrice($policyCode,$date)
      -> result;
    
  3. or download this
    #!/usr/bin/perl  - w
    # policy.cgi -policy SOAP handler
    ...
    -> dispatch_to('policy::(?:checkPolicyPrice)')
    -> handle
     ;
    
  4. or download this
    $ perl test-policy.pl
    what is your policyCode?ABC
    what is your date?31/10/2007
    500 Internal Server Error at test-policy.pl line 10