Select Code to Download

#!/usr/bin/perl --
use strict;
...
$trace->printRequest;
$trace->printResponse;
__END__

$VAR1 = {
          'parameters' => {
...
  Client-Transfer-Encoding: chunked

  <?xml version='1.0' encoding='utf-8'?><soapenv:Envelope xmlns:soapen
+v="http://schemas.xmlsoap.org/soap/envelope/"><soapenv:Body><urn:chec
+kVatResponse xmlns:urn="urn:ec.europa.eu:taxud:vies:services:checkVat
+:types"><urn:countryCode>IE</urn:countryCode><urn:vatNumber>123456789
+0</urn:vatNumber><urn:requestDate>2011-05-13+02:00</urn:requestDate><
+urn:valid>false</urn:valid></urn:checkVatResponse></soapenv:Body></so
+apenv:Envelope>