Ошибка в Custom Creatd Perl Plugin ?? Доступ запрещен - PullRequest
0 голосов
/ 24 октября 2011

Я новичок в Perl, поэтому вам нужно много помощи, я пытаюсь создать плагин Perl, используя эту ссылку,

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

Я создал имя файла check_test.pl в (/ 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”;

и после получения этой ошибки

[root @ localhost libexec] # ./check_test.pl -h 192.168.1.101 -s 192.168.1.110 -i 2 bash: ./check_test.pl: В доступе отказано

я пытаюсь добавить,

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

команда в command.cfg

вместо этого яполучение разрешения на ошибку отклонено, пожалуйста, хекп за эту ошибку, что на самом деле ошибка ???

1 Ответ

1 голос
/ 24 октября 2011

Я думаю, что вашему сценарию нужно разрешение на выполнение:

chmod +x check_test.pl 
...