从Perl脚本比较MySQL数据库中的日期

Question

我有一个带有MySQL查询的Perl脚本，如下所示

my $date         = strftime "%Y-%m-%d", localtime;

my $db_passwdcol = "password";
my $db_table     = "users";
my $db_usercol   = "username";
my $db_cond      = "expire_date";

my $sql_query    = "SELECT $db_passwdcol FROM $db_table WHERE $db_usercol = ?" . ($db_cond gt $date ? ");

我想做的是使用SQL查询比较当前日期和过期日期。 我尝试了许多变体，但绝望了。

提前致谢，

Answer 1

如下更改对我有用的sql查询字符串；

 $sql_query = "SELECT $db_passwdcol FROM $db_table WHERE $db_usercol = ? AND $db_cond > NOW()";

最好，