Select Code to Download

<tr>
  <td>$indexs0-200</td>
  <td>$indexs201-400</td>
  <td>$indexs401-600</td>
</tr>

#!/usr/bin/perl -w

...
$sth->finish(); 
$dbh->disconnect; 
print $q->end_html;