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.
This commit is contained in:
Holger Weiss 2014-06-18 18:45:10 +02:00
parent b63974c2cb
commit ae24aaeefb
2 changed files with 4 additions and 2 deletions

View file

@ -25,7 +25,8 @@ use English;
use Getopt::Long;
use File::stat;
use vars qw($PROGNAME);
use lib ".";
use FindBin;
use lib "$FindBin::Bin";
use utils qw (%ERRORS &print_revision &support);
sub print_help ();

View file

@ -29,7 +29,8 @@
use DBI;
use DBD::Sybase;
use Getopt::Long;
use lib ".";
use FindBin;
use lib "$FindBin::Bin";
use utils qw($TIMEOUT %ERRORS &print_revision &support);
use strict;