(any other comment or criticism on the code is warmly welcome)
I'll point out a SQL bug in your code:
my $sql = << "__SQL__"; declare \@AZIONE int; set \@AZIONE = (SELECT id FROM desAz WHERE az LIKE 'XXXX%' ); select * from desCc where id = \@AZIONE; __SQL__
It is possible that SELECT id FROM desAz WHERE az like '...' could return more than one row, @AZIONE will get set to the last value returned. That's one of the reasons why using a JOIN here would be a lot better.

Michael


In reply to Re: ADO, multiple statements and Perl by mpeppler
in thread ADO, multiple statements and Perl by l3nz

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":