check_logfiles for the slightly magical usage, when files are named with the current date, but we can't expect a static filename

check_logfiles.cfg

## Config
$seekfilesdir = '/var/tmp';
my $logdir = '/var/log/app';

my $search_defaults = {
  tag => 'prefix',
  criticalpatterns => 'someerror',
  options => 'sticky=3600,allyoucaneat',
};

## Internal
use POSIX qw(strftime);
@searches = ();

my $date = strftime "%y%m%d", localtime;
my $tag = $search_defaults->{'tag'};
my $prefix = "${tag}${date}";

my $dh;
if (! opendir($dh, $logdir)) {
  print("Could not open ${logdir} - $!");
  exit(3);
}

while (my $file = readdir($dh)) {
  if (! -f $file || $file !~ /^${prefix}/) {
    next;
  }

  my $search = { %$search_defaults };
  $search->{'tag'} .= $date;
  $search->{'logfile'} = "${logdir}\\$file";

  push @searches, $search;
}

if (@searches == 0) {
  print("OK - No files found for ${tag}${date}*");
  exit(0);
}

# Debugging
#use Data::Dumper;
#print Dumper(\@searches);

1;