如何在同一列上使用 2 个条件过滤 Perl DBIx 记录集？

Question

我正在接触 DBIx::Class — 到目前为止我很喜欢它。

我遇到的一个问题是我想查询记录，过滤掉不在特定日期范围内的记录。

我花了一段时间才弄清楚如何进行 <= 类型的匹配而不是相等匹配：

my $start_criteria = ">= $start_date";
my $end_criteria = "<= $end_date";
my $result   = $schema->resultset('MyTable')->search(
  {
    'status_date' => \$start_criteria,
    'status_date' => \$end_criteria,
  });

明显的问题是，由于过滤器位于散列中，因此我要覆盖“status_date”的值，并且仅搜索 status_date <= $end_date 的位置。执行的 SQL 是：

SELECT me.* from MyTable me where status_date <= '9999-12-31'

我搜索了 CPAN、Google 和 SO，但无法弄清楚如何将 2 个条件应用于同一列。我能找到的所有文档都显示了如何过滤超过 1 列，但不在同一列上过滤 2 个条件。

我确信我错过了一些明显的东西。这里有人可以向我指出吗？

Answer 1

IIRC，您应该能够传递多个搜索条件的数组引用（每个搜索条件都有自己的哈希引用）。例如：

my $result = $schema->resultset('MyTable')->search(
  [ { 'status_date' => \$start_criteria },
    { 'status_date' => \$end_criteria },
  ]
);

编辑：哎呀，神经病。它执行 OR，而不是 AND。

看起来正确的方法是为单个 status_date 提供哈希引用：

my $result = $schema->resultset('MyTable')->search(
    { status_date => { '>='  => $start_date,  '<='  => $end_date } } 
);

这些内容记录在 SQL::Abstract，DBIC 在底层使用它。

Answer 2

SQL 中有 BETWEEN ，DBIx::Class 也支持它：

my $result = $schema->resultset('MyTable')
   ->search({status_date => {between => [$start_date,$end_date]}});