diff options
author | Holger Weiss <holger@zedat.fu-berlin.de> | 2014-06-18 16:45:10 (GMT) |
---|---|---|
committer | Holger Weiss <holger@zedat.fu-berlin.de> | 2014-06-18 16:45:10 (GMT) |
commit | ae24aaeefba290d910a8d8f945716ecc84ca02ca (patch) | |
tree | bc569bc0a426fc1cd4cff2b8425ce9b89d13aa7b /plugins-scripts/check_file_age.pl | |
parent | b63974c2cb39705eacc4733ca7a376fde7d0921d (diff) | |
download | monitoring-plugins-ae24aaeefba290d910a8d8f945716ecc84ca02ca.tar.gz |
Use FindBin consistently across Perl plugins
Use Perl's FindBin module to locate the path to utils.pm in
check_file_age.pl and check_mssql.pl, just as we do in other Perl
plugins.
Diffstat (limited to 'plugins-scripts/check_file_age.pl')
-rwxr-xr-x | plugins-scripts/check_file_age.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/plugins-scripts/check_file_age.pl b/plugins-scripts/check_file_age.pl index 5e062de..ae25201 100755 --- a/plugins-scripts/check_file_age.pl +++ b/plugins-scripts/check_file_age.pl | |||
@@ -25,7 +25,8 @@ use English; | |||
25 | use Getopt::Long; | 25 | use Getopt::Long; |
26 | use File::stat; | 26 | use File::stat; |
27 | use vars qw($PROGNAME); | 27 | use vars qw($PROGNAME); |
28 | use lib "."; | 28 | use FindBin; |
29 | use lib "$FindBin::Bin"; | ||
29 | use utils qw (%ERRORS &print_revision &support); | 30 | use utils qw (%ERRORS &print_revision &support); |
30 | 31 | ||
31 | sub print_help (); | 32 | sub print_help (); |