import SOAP-WSDL 2.00_26 from CPAN

git-cpan-module:   SOAP-WSDL
git-cpan-version:  2.00_26
git-cpan-authorid: MKUTTER
git-cpan-file:     authors/id/M/MK/MKUTTER/SOAP-WSDL-2.00_26.tar.gz

t/SOAP/WSDL/11_helloworld.NET.t

@@ -13,9 +13,14 @@
 use strict;
 use Test::More tests => 4;
 use lib '../../../lib/';
-use File::Spec;
 use File::Basename;
+use File::Spec;
 
+my $path = File::Spec->rel2abs( dirname __FILE__ );
+my ($volume, $dir) = File::Spec->splitpath($path, 1);
+my @dir_from = File::Spec->splitdir($dir);
+unshift @dir_from, $volume if $volume;
+my $url = join '/', @dir_from;
 
 use_ok q/SOAP::WSDL/;
 
@@ -23,19 +28,16 @@ use_ok q/SOAP::WSDL/;
 print "# Testing SOAP::WSDL ". $SOAP::WSDL::VERSION."\n";
 print "# Acceptance test against sample output with simple WSDL\n";
 
-
-
 my $data = {
-	name => 'test',
-	givenName => 'test',
+    name => 'test',
+    givenName => 'test',
 };
 
 my $soap = undef;
-my $path = File::Spec->rel2abs( dirname __FILE__ );
 
 ok $soap = SOAP::WSDL->new(
-	wsdl => 'file:///'.$path.'/../../acceptance/wsdl/11_helloworld.wsdl',
-	no_dispatch => 1
+    wsdl => 'file://'.$url.'/../../acceptance/wsdl/11_helloworld.wsdl',
+    no_dispatch => 1
 ), 'Create SOAP::WSDL object'; 
 
 # won't work without - would require SOAP::WSDL::Deserializer::SOM,