use SOAP::Lite;
 
my $client = SOAP::Lite
	->uri('https:url?wsdl')
	->proxy('https://url');


my $var = SOAP::Data->type('string');
$var->name('pingValue');
$var->value("10.10.10.10");

# make the call
my $result = $client->Ping($var);

# check for error
unless ($result->fault) {
	print $result->result();
} else {

# error handling

	print join ', ',
		$result->faultcode,
		$result->faultstring,
		$result->faultdetail;
}