#!/usr/local/bin/perl -w

use SOAP::Lite 'trace', 'debug', on_action => sub {sprintf '%s/%s', @_};
use SOAP::Transport::HTTP;


my $client = SOAP::Lite
    ->readable(1)
    ->uri('https://www.venturetest.com')
    ->proxy('https://www.venturetest.com/getpdfservice/testgetpdf.asmx')
;
 
$client->TestGetPDF();