perl使用selectrow_array从数据库中获取信息

Question

我在perl下工作。我正在实施动态查询，我对这些内容有疑问，如果你能在我搜索期间给我一些建议。

现在，我的静态查询：

 my $envoi_numfact = $dbh->selectrow_array("SELECT envoi_numfact FROM user.envoi where envoi_reference='hapiness'");

 print Dumper($envoi_numfact);

我的结果很好：

$VAR1 = '1611029546';

所以我想在动态查询中对其进行转换，例如：

my $envoi_numfact = $dbh->selectrow_array("SELECT envoi_numfact FROM user.envoi where envoi_reference=?",undef,$hash_infos{ope_ref}    );

$hash_infos{ope_ref}代表envoi_reference。

结果，我有：

$VAR1 = undef;

任何人都可以帮助我吗？

Answer 1

我是胜利者！我刚刚忘记了结束括号。

my $envoi_numfact = $dbh->selectrow_array("SELECT envoi_numfact FROM user.envoi where envoi_reference=?",undef,$hash_infos{ope_ref}    );

变为

        my $envoi_numfact = $dbh->selectrow_array("SELECT envoi_numfact FROM user.envoi where envoi_reference = ?",undef,($hash_infos{ope_ref}));