Скрипт Для Мониторинга 80 Порта Для Nagios

vycheslav

New Member
01.07.2013
1
0
#1
Добрый день.
Помогите пожалуйста необходим скрипт для мониторинга 80 порта через Nagios, есть вот такой скрипт
#!/usr/bin/perl -w
use Net::Telnet;
use strict;
my $c1 = Net::Telnet->new(Timeout=>60);
my $connect = $c1->open(Host=>'ya.ru',Port=>'80');
#print $connect;

if ( $connect == "1") {
print "0";
exit 0;
} else {
print "2";
exit 2;
}

Ну он не срабатывает, подскажите что можно еще сделать