SL/BackgroundJob/Test.pm

   1 package SL::BackgroundJob::Test;
   2
   3 use parent qw(SL::BackgroundJob::Base);
   4
   5 sub run {
   6   my $self   = shift;
   7   my $db_obj = shift;
   8
   9   $::lxdebug->message(0, "Test job is being executed.");
  10 }
  11
  12
  13 1;