diff options
Diffstat (limited to 'plugins-scripts')
| -rwxr-xr-x | plugins-scripts/check_flexlm.pl | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/plugins-scripts/check_flexlm.pl b/plugins-scripts/check_flexlm.pl index 6bda29bd..0f7ab6e8 100755 --- a/plugins-scripts/check_flexlm.pl +++ b/plugins-scripts/check_flexlm.pl | |||
| @@ -1,4 +1,4 @@ | |||
| 1 | #! /usr/bin/perl -wT | 1 | #! /usr/bin/perl -w |
| 2 | # | 2 | # |
| 3 | # usage: | 3 | # usage: |
| 4 | # check_flexlm.pl license_file | 4 | # check_flexlm.pl license_file |
| @@ -66,7 +66,11 @@ $SIG{'ALRM'} = sub { | |||
| 66 | }; | 66 | }; |
| 67 | alarm($TIMEOUT); | 67 | alarm($TIMEOUT); |
| 68 | 68 | ||
| 69 | my $lmstat = "/opt/lic/sw/cadadm/default/bin/lmstat"; | 69 | my $lmstat = $utils::PATH_TO_LMSTAT ; |
| 70 | unless (-x $lmstat ) { | ||
| 71 | print "Cannot find \"lmstat\"\n"; | ||
| 72 | exit $ERRORS{'UNKNOWN'}; | ||
| 73 | } | ||
| 70 | 74 | ||
| 71 | ($opt_F) || ($opt_F = shift) || usage("License file not specified\n"); | 75 | ($opt_F) || ($opt_F = shift) || usage("License file not specified\n"); |
| 72 | my $licfile = $1 if ($opt_F =~ /^(.*)$/); | 76 | my $licfile = $1 if ($opt_F =~ /^(.*)$/); |
