#!/usr/bin/perl
use strict;
use warnings;
use SOAP::Lite +trace => [transport => \&soap_trace];
use Data::Dumper;

sub soap_trace {
	my ($in) = @_;
	print '-' x 80;
	print "\n".Dumper($in);
}

my $url = 'https: //ssl. ibanrechner. de/soap/?wsdl'; # BLANKS ENTFERNEN!
my $soap = SOAP::Lite->new();
my $service = $soap->service($url);