File Coverage

blib/lib/Nagios/Plugin/CheckHost/Result/Http.pm

Criterion	Covered	Total	%
statement	13	13	100.0
branch			n/a
condition			n/a
subroutine	5	5	100.0
pod	0	2	0.0
total	18	20	90.0

package Nagios::Plugin::CheckHost::Result::Http;

use strict;
use warnings;

use base 'Nagios::Plugin::CheckHost::Result';

sub request_ok {
    my ($self, $node) = @_;

    $self->{results}->{$node}->[0]->[0];
}

sub request_time {
    my ($self, $node) = @_;

    0+$self->{results}->{$node}->[0]->[1];
}

1;