两个日期Perl之间的例行检查

Question

尝试在perl中构建一个例程脚本，每月两次（第15天和月末）

运行查询，获取在日期间隔内创建的所有用户。 （15日从第一天开始创建所有客户，直到那一天！并在月底将所有用户从第15天创建到当天）

通常我会说这不是在查询中执行此操作的问题。但是这个脚本每月一个月运行两次！我必须考虑更短的月份和闰年！

有没有在perl中执行此操作而不会进入过大的if条件？

Answer 1

您可以使用Date :: Calc模块函数Days_in_Month

  use Date::Calc qw(:all);

#  Days_in_Month
      my ($year,$month) = (2013,12);
      $days = Days_in_Month($year,$month);

Answer 2

为什么在perl中解决这个问题？

cron完全能够在检查点运行文件脚本。

然后，您可以像平常一样使用查询中的日期间隔。