Select Code to Download

if ( $ENV{HTTP_COOKIE} ) {
 $dbh->do(q{ 
      UPDATE logs SET visits = visits + 1 WHERE host = ? },
      {}, $host );
}