Question

i am new to perl so need you help alot i try to create perl plugin using this link,

http://itwarriors.com/?p=1

i have created file name check_test.pl in (/usr/local/nagios/libexec),

#! /usr/bin/perl
use strict;
use Getopt::Long qw(:config no_ignore_case);
my ($host, $server, $instances);
my $result = GetOptions(
“H|host=s” => \$host,
“s|server=s” => \$server,
“i|instances=s” => \$instances,
);
print “My host IP is $host\n”;
print “My Server IP is $server\n”;
print “Times Server found are $instances\n”;

and after getting this error,

[root@localhost libexec]# ./check_test.pl -h 192.168.1.101 -s 192.168.1.110 -i 2
bash: ./check_test.pl: Permission denied

i try to add ,

# 'check_test' command definition
define command{
command_name    check_test
command_line    $USER1$/check_test.pl -H $HOSTADDRESS$ -s 12489 
}

command in command.cfg

instead of that i am getting error permission denied please hekp for this error that what actually error is???

Answer 1

I think your script needs execution permission:

chmod +x check_test.pl