NAME
WWW::Giraffi::API::MonitoringData - Giraffi API MonitoringData Method Module
VERSION
0.2_04
SYNOPSIS
use strict;
use warnings;
use WWW::Giraffi::API;
my $apikey = "ilovenirvana_ilovekurtcobain";
my $g = WWW::Giraffi::API->new(apikey => $apikey);
# get monitoringdata
my $conditions = {};
my $arrayref = $g->monitoringdata->search($conditions);
foreach $ref(@{$arrayref}) {
## anything to do...
}DESCRIPTION
WWW::Giraffi::API::MonitoringData - Giraffi API MonitoringData Method Module
METHOD
all
Get All MonitoringData
Example:
$ create item object
my $item = $g->item;
my $arrayref = $item->all;Return Array Reference:
[
{
'alert' => $VAR1->[0]{'alert'},
'job_id' => '6dbdd3b0-23fd-012f-14c4-2e7d4013ef81',
'threshold' => [],
'value' => '200',
'checked_at' => 1326889516,
'compared_at' => 1326889516,
'_id' => '4f16ba382325b42fa6007b80',
'region' => 'JP',
'service_id' => 10,
'created_at' => 1326889528,
'user_id' => 16,
'servicetype' => 'web_response_code',
'customkey' => undef
}
]unix timestamp will be changed into Time::Piece Object.
Example:
$monitoring->use_time_piece(1);
my $arrayref = $monitoring->all;
# created_at/compared_at/checked_at is Time::Piece Object
[
{
'alert' => $VAR1->[21]{'alert'},
'job_id' => '8b5c4030-23fe-012f-14c4-2e7d4013ef81',
'threshold' => [],
'value' => '404',
'checked_at' => bless( [
16,
32,
21,
18,
0,
'112',
3,
17,
0,
1326889936,
1
], 'Time::Piece' ),
'compared_at' => bless( [
16,
32,
21,
18,
0,
'112',
3,
17,
0,
1326889936,
1
], 'Time::Piece' ),
'_id' => '4f16bc172325b42fa6007b8f',
'region' => 'JP',
'service_id' => 10,
'created_at' => bless( [
27,
33,
21,
18,
0,
'112',
3,
17,
0,
1326890007,
1
], 'Time::Piece' ),
'user_id' => 16,
'servicetype' => 'web_response_code',
'customkey' => undef
}
]search
Get MonitoringData by conditions
Example:
$ create monitoringdata object
my $moniringdata = $g->monitoringdata;
my $contidions = { service_id => 10 };
my $arrayref = $moniringdata->search($conditions);Return Array Reference:
[
{
'alert' => $VAR1->[0]{'alert'},
'job_id' => '6dbdd3b0-23fd-012f-14c4-2e7d4013ef81',
'threshold' => [],
'value' => '200',
'checked_at' => 1326889516,
'compared_at' => 1326889516,
'_id' => '4f16ba382325b42fa6007b80',
'region' => 'JP',
'service_id' => 10,
'created_at' => 1326889528,
'user_id' => 16,
'servicetype' => 'web_response_code',
'customkey' => undef
}
]create
Post MonitoringData
Example:
my $conditions = {
servicetype => "load_average",
value => "5.11",
customkey => "00:00:00:00:00:00",
ck_init => "00:00:00:00:00:00",
'tags' => [
'1.0.0.1',
'00:00:00:00:00:00',
'test.priv'
],
checked_at => time
};
my $data = $monitoringdata->create($conditions);AUTHOR
Akira Horimoto <emperor@gmail.com>
LICENSE
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.