File Coverage

blib/lib/WWW/Giraffi/API/Trend.pm

Criterion	Covered	Total	%
statement	12	35	34.2
branch	0	4	0.0
condition			n/a
subroutine	4	6	66.6
pod	2	2	100.0
total	18	47	38.3

package WWW::Giraffi::API::Trend;

use strict;
use warnings;
use Time::Piece;

use parent qw(WWW::Giraffi::API::Request);

our $VERSION = '0.2_04';

sub search_average {

    my ( $self, $conditions, $other_options ) = @_;
    my $arrayref = $self->get( "trends/average.json", $conditions, $other_options );
	if ($self->use_time_piece) {
		my $tmp_arrayref = [];
		foreach my $ref(@{$arrayref}) {
			$ref->{checked_at} = localtime($ref->{checked_at});
			push @{$tmp_arrayref}, $ref;
		}
		$arrayref = $tmp_arrayref;
	}
	return $arrayref;
}

sub search_failure {

    my ( $self, $conditions, $other_options ) = @_;
    my $arrayref = $self->get( "trends/failure.json", $conditions, $other_options );
	if ($self->use_time_piece) {
		my $tmp_arrayref = [];
		foreach my $ref(@{$arrayref}) {
			$ref->{failed_start_at} = localtime($ref->{failed_start_at});
			$ref->{failed_end_at}   = localtime($ref->{failed_end_at});
			push @{$tmp_arrayref}, $ref;
		}
		$arrayref = $tmp_arrayref;
	}
	return $arrayref;
}


1;

__END__