File Coverage

blib/lib/WWW/TypePad/ApiKeys.pm
Criterion Covered Total %
statement 15 21 71.4
branch n/a
condition n/a
subroutine 5 7 71.4
pod 1 2 50.0
total 21 30 70.0


line stmt bran cond sub pod time code
1             package WWW::TypePad::ApiKeys;
2              
3 1     1   5 use strict;
  1         2  
  1         29  
4 1     1   6 use warnings;
  1         2  
  1         90  
5              
6             # Install an accessor into WWW::TypePad to access an instance of this class
7             # bound to the WWW::TypePad instance.
8 0     0 0   sub WWW::TypePad::api_keys { __PACKAGE__->new( base => $_[0] ) }
9              
10             ### BEGIN auto-generated
11             ### This is an automatically generated code, do not edit!
12             ### Scroll down to look for END to add additional methods
13              
14             =pod
15              
16             =head1 NAME
17              
18             WWW::TypePad::ApiKeys - ApiKeys API methods
19              
20             =head1 METHODS
21              
22             =cut
23              
24 1     1   4 use strict;
  1         2  
  1         28  
25 1     1   5 use Any::Moose;
  1         2  
  1         5  
26             extends 'WWW::TypePad::Noun';
27              
28 1     1   729 use Carp ();
  1         2  
  1         100  
29              
30              
31             =pod
32              
33             =over 4
34              
35              
36             =item get
37              
38             my $res = $tp->api_keys->get($id);
39              
40             Get basic information about the selected API key, including what application it belongs to.
41              
42             Returns ApiKey which contains following properties.
43              
44             =over 8
45              
46             =item apiKey
47              
48             (string) The actual API key string. Use this as the consumer key when making an OAuth request.
49              
50             =item owner
51              
52             (Application) The application that owns this API key.
53              
54              
55             =back
56              
57             =cut
58              
59             sub get {
60 0     0 1   my $api = shift;
61 0           my @args;
62 0           push @args, shift; # id
63 0           my $uri = sprintf '/api-keys/%s.json', @args;
64 0           $api->base->call("GET", $uri, @_);
65             }
66              
67              
68             =pod
69              
70             =back
71              
72             =cut
73              
74             ### END auto-generated
75              
76             1;