my ($isbn_number) = @ARGV;
  use SOAP::Lite +autodispatch=>
      uri=>'http://www.designa.de/', outputxml=>1,
      proxy=>'http://192.168.1.100/AbacusWebService/ServiceCashPoint.asmx';
  my $isbn_xml = isAlive();
  print "$isbn_xml\n";