Help for this page
my $sql = "SELECT * FROM final WHERE pat = \"" . $PatenteToQuery . " +\"" and WHERE ped = \"" . $PedimentoToQuery ."\";
#!c:/perl/bin/perl.exe ... } }