my $soapa = SOAP::Lite->new();
   $soapa->proxy("$WS_proxy");
   $soapa->readable(1);
   $soapa->service("$WS_service");
my $data = SOAP::Data->new();  
   $data->uri("$WS_namespace");
   my $method = $data->name('yourService');
   my @params = (SOAP::Data->name('arg1' => ""),
 SOAP::Data->name('arg0' => ""));
 $result = $soapa->call($method => @params)->result;
   print Dumper($result);
}