1 package System::Introspector::Probe::Nagios::CheckMkAgent;
4 use System::Introspector::Util qw(
11 return transform_exceptions {
12 my @lines = $self->_get_check_mk_agent_output;
16 for my $line (@lines) {
17 if ($line =~ m{^<<<(.+)>>>$}) {
18 $plugin{ $1 } = $current = [];
22 push @$current, $line;
24 return { nagios_check_mk_agent => \%plugin };
28 sub _get_check_mk_agent_output {
29 return lines_from_command ['check_mk_agent'];
38 System::Introspector::Nagios::CheckMkAgent - Gather check_mk_agent output
42 Parses the output of C<check_mk_agent> to gather data available to Nagios.
48 =item L<System::Introspector>