for my $n ( 1..200 ) {
  my $sql = qq{ INSERT INTO moo
                SELECT id$n, escore, org_id$n
                FROM blast, protein
                WHERE id$n = id
                AND text_id = ?};
  [...]
}