Select Code to Download

   my $useragent = "SELECT useragent FROM visit
   WHERE engine_id = 'Junk'";
...
   {
      print "<center>$_</center>";
   }

my $data = "SELECT engine_id,useragent,ip,date FROM visit
WHERE engine_id = 'Junk'";
$sth = $dbh->prepare($data);
$sth->execute() or die $dbh->errstr;
while (my @row = $sth->fetchrow_array) { print "$_<br>" for @row }

<td>COUNT (ID)</td> <td>UserAgent</td> <td>IP</td> <td>time</td> <td><
+/td><tr>
 ...... again ....