option is taken and that is the hostname to poll.
This will die on snmpget failure.
my $raw_json=$$sneck_snoot_booper->boop_the_snoot($host);
=cut
sub boop_the_snoot {
my $self = $_[0];
my $
oid, $json ) = split( /\ +/, $returned, 2 );
$json =~ s/^\"//;
$json =~ s/\"$//;
# check for base64 incasae the return has been gzipped
if ($json =~ /^[A-Za-z0-9\/\+\n]+\=*\n*$/ ) {
$json = gun
zip(decode_base64($json));
}
return $json;
}
=head1 AUTHOR
Zane C. Bowers-Hadley, C<< <vvelox at vvelox.net> >>
=head1 BUGS
Please report any bugs or feature requests to C<bug-monitoring-sneck-