Select Code to Download

Select or download this

  <Location /DomainCheck>
    SetHandler perl-script
    PerlHandler Apache::SOAP
    PerlSetVar dispatch_to "DomainCheck"
  </Location>

Select or download this

#!/usr/bin/perl
use strict;
...
$soap->on_debug(sub{print@_});

my $result = $soap->Check("perl.com");

Select or download this

<?xml version="1.0" encoding="UTF-8"?>
<SOAP-ENV:Envelope xmlns:xsi="http://www.w3.org/1999/XMLSchema-instanc
+e" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/" xmlns:S
+OAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http:/
+/www.w3.org/1999/XMLSchema" SOAP-ENV:encodingStyle="http://schemas.xm
+lsoap.org/soap/encoding/">
...
  </SOAP-ENV:Body>
</SOAP-ENV:Envelope>

Select or download this

<?xml version="1.0" encoding="UTF-8"?>
<SOAP-ENV:Envelope xmlns:xsi="http://www.w3.org/1999/XMLSchema-instanc
+e" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/" xmlns:S
+OAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http:/
+/www.w3.org/1999/XMLSchema" SOAP-ENV:encodingStyle="http://schemas.xm
+lsoap.org/soap/encoding/">
...
    </namesp7:CheckResponse>
  </SOAP-ENV:Body>
</SOAP-ENV:Envelope>

Select or download this

<?xml version="1.0" encoding="utf-8"?>
<soap:Envelope 
...
    </CheckResponse>
  </soap:Body>
</soap:Envelope>