$dbh = DBI->connect (@db_connect) or &cgierr ("Connection Error. Reason: " . $DBI::errstr . "\n.");
$query = qq~
SELECT
date_exp,
TO_DAYS(date_exp) - TO_DAYS(CURRENT_DATE) AS days
FROM $db_table
WHERE date_exp between CURDATE() and DATE_ADD(CURDATE(), INTERVAL 1 MONTH)
ORDER BY date_exp
~;
$sth = $dbh->prepare ($query) or &cgierr("Unable to query database. Reason: $DBI::errstr. Query: $query");
$sth->execute or &cgierr("Unable to query database. Reason: $DBI::errstr. Query: $query");
while (@tmp = $sth->fetchrow_array) {

Here is where I get lost - I don't know how to get it to compare the date_exp of the member who is logged in and the list that I just retrieved in this query


}


$sth->finish;
$dbh->disconnect or &cgierr ("Can't Disconnect. Reason: $DBI::errstr\n. Query: $query");