File Coverage

blib/lib/AsposeSlidesCloud/Object/Portion.pm
Criterion Covered Total %
statement 30 35 85.7
branch n/a
condition n/a
subroutine 10 13 76.9
pod 0 3 0.0
total 40 51 78.4


line stmt bran cond sub pod time code
1             package AsposeSlidesCloud::Object::Portion;
2              
3             require 5.6.0;
4 1     1   262 use strict;
  1         3  
  1         22  
5 1     1   5 use warnings;
  1         1  
  1         19  
6 1     1   4 use utf8;
  1         1  
  1         4  
7 1     1   24 use JSON qw(decode_json);
  1         1  
  1         4  
8 1     1   72 use Data::Dumper;
  1         1  
  1         35  
9 1     1   5 use Module::Runtime qw(use_module);
  1         2  
  1         4  
10 1     1   49 use Log::Any qw($log);
  1         2  
  1         4  
11 1     1   190 use Date::Parse;
  1         3  
  1         97  
12 1     1   6 use DateTime;
  1         2  
  1         22  
13              
14 1     1   4 use base "AsposeSlidesCloud::Object::BaseObject";
  1         2  
  1         167  
15              
16             #
17             #
18             #
19             #NOTE: This class is auto generated by the swagger code generator program. Do not edit the class manually.
20             #
21              
22             my $swagger_types = {
23             'Text' => 'string',
24             'FontColor' => 'string',
25             'FontHeight' => 'double',
26             'SelfUri' => 'ResourceUri',
27             'AlternateLinks' => 'ARRAY[ResourceUri]',
28             'Links' => 'ARRAY[ResourceUri]'
29             };
30              
31             my $attribute_map = {
32             'Text' => 'Text',
33             'FontColor' => 'FontColor',
34             'FontHeight' => 'FontHeight',
35             'SelfUri' => 'SelfUri',
36             'AlternateLinks' => 'AlternateLinks',
37             'Links' => 'Links'
38             };
39              
40             # new object
41             sub new {
42 0     0 0   my ($class, %args) = @_;
43             my $self = {
44             #
45             'Text' => $args{'Text'},
46             #
47             'FontColor' => $args{'FontColor'},
48             #
49             'FontHeight' => $args{'FontHeight'},
50             #
51             'SelfUri' => $args{'SelfUri'},
52             #
53             'AlternateLinks' => $args{'AlternateLinks'},
54             #
55 0           'Links' => $args{'Links'}
56             };
57              
58 0           return bless $self, $class;
59             }
60              
61             # get swagger type of the attribute
62             sub get_swagger_types {
63 0     0 0   return $swagger_types;
64             }
65              
66             # get attribute mappping
67             sub get_attribute_map {
68 0     0 0   return $attribute_map;
69             }
70              
71             1;