POST /services/svrLogin.asmx HTTP/1.1
Host: website.com
Content-Type: text/xml; charset=utf-8
Content-Length: length
SOAPAction: "http://tempuri.org/ControlNET/svrLogin/GetCreds"

<?xml version="1.0" encoding="utf-8"?>
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
  <soap:Body>
    <GetCreds xmlns="http://tempuri.org/ControlNET/svrLogin">
      <Username />
      <Password />
    </GetCreds>
  </soap:Body>
</soap:Envelope>

##</code><code>##

<?xml version="1.0" encoding="UTF-8"?>
<soap:Envelope
    xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
    xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/"
    xmlns:xsd="http://www.w3.org/2001/XMLSchema"
    soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
    xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
  <soap:Body>
     <GetCreds xmlns="http://tempuri.org/ControlNET/svrLogin">  
      <Username>username</Username>
      <Password>********(hidden)**********</Password>    
	   </GetCreds>
  </soap:Body>
</soap:Envelope>

##</code><code>##

#!c:/perl/bin
use SOAP::Lite+trace => 'all';
use XML::Simple;
use Data::Dumper;

system("cls");

$method	= 'GetCreds';
$ep		= 'http://website.com/services/svrLogin.asmx';
$uri	= 'http://tempuri.org/ControlNET/svrLogin';

$xml = '<Username>username</Username>
      <Password>********(hidden)**********</Password>';

$soap = SOAP::Lite
-> proxy ($ep)
-> uri($uri)
-> on_action( sub { join '', $uri, $_[1] } )
-> readable(1)
-> call ($method => SOAP::Data->type('xml' => $xml));

print Dumper($soap);