index 2ab1a28b761ad74f20bf29121bd2ccc528b71213..43038fae6151d47c0828d725bb2260902db0cc62 100755 (executable)
#!/bin/perl -w
# $Id$
-# check_file.pl Copyright (C) 2003 Steven Grimm <koreth-nagios@midwinter.com>
+# check_file_age.pl Copyright (C) 2003 Steven Grimm <koreth-nagios@midwinter.com>
#
# Checks a file's size and modification time to make sure it's not empty
# and that it's sufficiently recent.
my ($opt_c, $opt_f, $opt_w, $opt_C, $opt_W, $opt_h, $opt_V);
my ($result, $message, $age, $size, $st);
-$PROGNAME="check_file";
+$PROGNAME="check_file_age";
$opt_w = 240;
$opt_c = 600;