Advertisement
breatbreaker

Untitled

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