package WebService::Mackerel;
use 5.008001;
use strict;
use warnings;
use Carp qw/croak/;
use JSON;
use HTTP::Tiny;
use URI;
our $VERSION = "0.05";
sub new {
my ($class, %args) = @_;
$args{a
'GET', $uri->as_string, {
headers => {
'content-type' => 'application/json',
'X-Api-Key' => $self->{api_key},
},
});
return $res-
ckerel_origin} . $path, {
content => encode_json $args,
headers => {
'content-type' => 'application/json',
'X-Api-Key' => $self->{api_key},