Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/perl -w
- # import interface. All methods from loaded service are imported by default
- use SOAP::Lite
- service => 'http://www-student.it.uts.edu.au/~chw/cc.php?WSDL',;
- print sayHello({ name => 'Got it'}), "\n";
- print checkCard({ cardType => 'visa', cardNumber => '4111111111111111'}), "\n";
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement