Hola:
tengo un nuevo plugin para Nagios que casi funciona como pretendo ;)
Aquí va el código:
#!perl
use warnings;
use strict;
use File::Find;
# hash with the nagios errorlevels
my %ERRORS = (
'OK' => 0,
'WARNING' => 1,
'CRITICAL' => 2,
'UNKNOWN' => 3,
);
# here we save the number of missed shortcuts in the subroutine _check_path
my $count = 0;
# here ...