SL/DB/Manager/BackgroundJob.pm

   1 package SL::DB::Manager::BackgroundJob;
   2
   3 use strict;
   4
   5 use SL::DB::Helpers::Manager;
   6 use base qw(SL::DB::Helpers::Manager);
   7
   8 sub object_class { 'SL::DB::BackgroundJob' }
   9
  10 __PACKAGE__->make_manager_methods;
  11
  12 sub cleanup {
  13   my $class = shift;
  14   $class->delete_all(where => [ and => [ type => 'once', last_run_at => { lt => DateTime->now_local->subtract(days => '1') } ] ]);
  15 }
  16
  17 sub get_all_need_to_run {
  18   my $class = shift;
  19   return $class->get_all(where => [ and => [ active => 1, next_run_at => { le => DateTime->now_local } ] ]);
  20 }
  21
  22 1;