e Getopt::Long qw(GetOptionsFromArray);
use Try::Tiny;
use MongoDB;
use MongoDB::MongoClient;
use JSON;
=head1 NAME
App::Unicheck::Modules::MongoDB - App::Unicheck module to check mongodb servers.
, $value, $format) = @_;
return JSON->new->encode(
{
message => $value,
status => $status,
}
) if $format eq 'json';
# default last in case some n
mats => {
'num' => 'Returns the status code',
'json' => 'Returns a JSON structure',
},
},
},
}
}
=head1 AUTHOR
Matthi