=> hmac_sha1_hex($date_string, $self->secret), 'accept' => 'application/json', ); } around qw/get put post delete/ => sub { my $orig = shift; my $self = shift;