use checkVatService; 
use SOAP::Lite +trace => qw( debug ); 
my $validity = new checkVatService;
$validity->readable(1); 
$validity->want_som(1); 
$response = $validity->checkVat("IE" , "1234567890");