summaryrefslogtreecommitdiffstats
path: root/plugins-scripts/check_flexlm.pl
diff options
context:
space:
mode:
Diffstat (limited to 'plugins-scripts/check_flexlm.pl')
-rwxr-xr-xplugins-scripts/check_flexlm.pl10
1 files changed, 3 insertions, 7 deletions
diff --git a/plugins-scripts/check_flexlm.pl b/plugins-scripts/check_flexlm.pl
index 1d26b7c8..595a0b34 100755
--- a/plugins-scripts/check_flexlm.pl
+++ b/plugins-scripts/check_flexlm.pl
@@ -26,19 +26,15 @@
26# initial version: 9-10-99 Ernst-Dieter Martin edmt@infineon.com 26# initial version: 9-10-99 Ernst-Dieter Martin edmt@infineon.com
27# 27#
28# License: GPL 28# License: GPL
29# $Id$
29# 30#
30 31
31BEGIN {
32 if ($0 =~ m/^(.*?)[\/\\]([^\/\\]+)$/) {
33 $runtimedir = $1;
34 $PROGNAME = $2;
35 }
36}
37 32
38use strict; 33use strict;
39use Getopt::Long; 34use Getopt::Long;
40use vars qw($opt_V $opt_h $opt_F $verbose $PROGNAME); 35use vars qw($opt_V $opt_h $opt_F $verbose $PROGNAME);
41use lib $main::runtimedir; 36use FindBin ;
37use lib "$FindBin::Bin";
42use utils qw($TIMEOUT %ERRORS &print_revision &support &usage); 38use utils qw($TIMEOUT %ERRORS &print_revision &support &usage);
43 39
44sub print_help (); 40sub print_help ();