Use of uninitialized value $_[0] in pattern match (m//) at C:/Strawberry/perl/si
te/lib/SOAP/Lite.pm line 340.
Use of uninitialized value in sprintf at C:/Strawberry/perl/site/lib/SOAP/Lite.p
m line 3612.
Press any key to continue . . .

##</code><code>##

#!/usr/bin/perl -w

use strict;
use diagnostics;
use warnings;
use Data::Dumper;
eval {
  require SOAP::Lite;
};
die "Fehler:\n$@\n\n" if $@;

my $soap = SOAP::Lite->new();
print "test \n";

my $service = $soap->service('http://192.168.1.100/AbacusWebService/ServiceCashPoint.asmx?wsdl');
print Dumper($service->getCardInfo('ws','ws','45','pm010010110000000037'));
print "test \n";