use XML::Compile::WSDL11;      # use WSDL version 1.1
use XML::Compile::SOAP11;      # use SOAP version 1.1
use XML::Compile::Transport::SOAPHTTP;
use LWP::UserAgent;
 
my $browser = LWP::UserAgent->new();
my $wsdl_data = $browser->get("https://10.220.226.30/services/fwif?wsdl");
my $schema_data = $browser->get("https://10.220.226.30/services/ninjaprobe.xsd");
 
my $wsdl = XML::Compile::WSDL11->new($wsdl_data->content);
$wsdl->importDefinitions($schema_data->content);

my $call = $wsdl->compileCalls;