File Coverage

blib/lib/WebService/TypePad/Object/Entity.pm
Criterion Covered Total %
statement 12 22 54.5
branch 0 4 0.0
condition n/a
subroutine 4 6 66.6
pod 2 2 100.0
total 18 34 52.9


line stmt bran cond sub pod time code
1             package WebService::TypePad::Object::Entity;
2 2     2   9 use strict;
  2         4  
  2         50  
3 2     2   23 use warnings;
  2         4  
  2         40  
4 2     2   9 use WebService::TypePad::Util::Coerce;
  2         4  
  2         45  
5 2     2   9 use base qw(WebService::TypePad::Object::Base);
  2         3  
  2         872  
6              
7             sub id {
8 0     0 1   my $self = shift;
9 0 0         if (@_) {
10 0           $self->{data}{id} = WebService::TypePad::Util::Coerce::coerce_string_in($_[0]);
11 0           return $_[0];
12             }
13             else {
14 0           return $self->{data}{id};
15             }
16             }
17              
18             sub url_id {
19 0     0 1   my $self = shift;
20 0 0         if (@_) {
21 0           $self->{data}{urlId} = WebService::TypePad::Util::Coerce::coerce_string_in($_[0]);
22 0           return $_[0];
23             }
24             else {
25 0           return $self->{data}{urlId};
26             }
27             }
28              
29             1;
30              
31             =head1 NAME
32              
33             WebService::TypePad::Object::Entity - Perl representation of TypePad's Entity object type
34              
35             =head1 SYNOPSIS
36              
37             use WebService::TypePad::Object::Entity;
38             my $entity = WebService::TypePad::Object::Entity->new();
39              
40             =head1 DESCRIPTION
41              
42             This is a Perl representation of TypePad's Entity object type.
43             For more information about this type and its parameters, see L.
44              
45             =head1 PROPERTIES
46              
47             Each of these properties has an accessor method which will retrieve the property's value when called with no arguments or set the property's value when called with one argument.
48              
49             =head2 $entity->id
50              
51             A URI that serves as a globally-unique id for the object. This can be used to recognise where the same user is returned in response to different requests, and as a mapping key for an application's local data store.
52              
53             Returns a single C value.
54              
55             =head2 $entity->url_id
56              
57             A string containing the canonical identifier that can be used as the "id" for this object in URLs. However, this should not be used as a database key to avoid collisions when an application is switched to a different backend server; use the "id" property instead.
58              
59             Returns a single C value.
60              
61             =head1 SEE ALSO
62              
63             =over 1
64              
65             =item * L
66              
67             =back