File Coverage

blib/lib/WebService/TypePad/Object/VideoLink.pm
Criterion Covered Total %
statement 12 17 70.5
branch 0 2 0.0
condition n/a
subroutine 4 5 80.0
pod 1 1 100.0
total 17 25 68.0


line stmt bran cond sub pod time code
1             package WebService::TypePad::Object::VideoLink;
2 1     1   1558 use strict;
  1         2  
  1         35  
3 1     1   5 use warnings;
  1         3  
  1         27  
4 1     1   6 use WebService::TypePad::Util::Coerce;
  1         3  
  1         25  
5 1     1   5 use base qw(WebService::TypePad::Object::Base);
  1         3  
  1         242  
6              
7             sub embed_code {
8 0     0 1   my $self = shift;
9 0 0         if (@_) {
10 0           $self->{data}{embedCode} = WebService::TypePad::Util::Coerce::coerce_string_in($_[0]);
11 0           return $_[0];
12             }
13             else {
14 0           return $self->{data}{embedCode};
15             }
16             }
17              
18             1;
19              
20             =head1 NAME
21              
22             WebService::TypePad::Object::VideoLink - Perl representation of TypePad's VideoLink object type
23              
24             =head1 SYNOPSIS
25              
26             use WebService::TypePad::Object::VideoLink;
27             my $video_link = WebService::TypePad::Object::VideoLink->new();
28              
29             =head1 DESCRIPTION
30              
31             This is a Perl representation of TypePad's VideoLink object type.
32             For more information about this type and its parameters, see L.
33              
34             =head1 PROPERTIES
35              
36             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.
37              
38             =head2 $video_link->embed_code
39              
40             An opaque HTML fragment which, when embedded in a HTML page, will provide an inline player for the video.
41              
42             Returns a single C value.
43              
44             =head1 SEE ALSO
45              
46             =over 1
47              
48             =item * L
49              
50             =back