Select Code to Download

      my $sth = $dbh->prepare("select ... where fld1 = ? and
                                                fld2 = ? and       
...
       $sth->execute($var2, $var2, $var4);
       ...
      }

     for ($i=0; $i<800; $i++){
       ...
...
      $sth->execute();
       ...
     }