blob: 80f1efae7b7a1a4b7ecef444072159061c07aa3d (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
package FakeAPI;
use Moose;
use MooseX::Net::API;
has api_base_url => (
is => 'ro',
isa => 'Str',
default => 'http://identi.ca/api',
);
has format => ( is => 'ro', isa => 'Str', default => 'json', );
format_query 'format' => ( mode => 'content-type' );
net_api_method foo => (
description => 'this does foo',
method => 'GET',
path => '/foo/',
required => [qw/bar/],
);
1;
|
