File Coverage

blib/lib/AsposeSlidesCloud/Object/Shape.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::Shape;
2              
3             require 5.6.0;
4 1     1   384 use strict;
  1         1  
  1         22  
5 1     1   3 use warnings;
  1         5  
  1         18  
6 1     1   2 use utf8;
  1         1  
  1         4  
7 1     1   18 use JSON qw(decode_json);
  1         1  
  1         4  
8 1     1   68 use Data::Dumper;
  1         1  
  1         32  
9 1     1   3 use Module::Runtime qw(use_module);
  1         1  
  1         4  
10 1     1   41 use Log::Any qw($log);
  1         1  
  1         3  
11 1     1   91 use Date::Parse;
  1         1  
  1         67  
12 1     1   3 use DateTime;
  1         1  
  1         14  
13              
14 1     1   6 use base "AsposeSlidesCloud::Object::BaseObject";
  1         1  
  1         223  
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             'Paragraphs' => 'ResourceUriElement',
25             'ShapeType' => 'AutoShapeType',
26             'Name' => 'string',
27             'Width' => 'double',
28             'Height' => 'double',
29             'AlternativeText' => 'string',
30             'Hidden' => 'boolean',
31             'X' => 'double',
32             'Y' => 'double',
33             'ZOrderPosition' => 'int',
34             'Shapes' => 'ResourceUriElement',
35             'FillFormat' => 'FillFormat',
36             'LineFormat' => 'LineFormat',
37             'SelfUri' => 'ResourceUri',
38             'AlternateLinks' => 'ARRAY[ResourceUri]',
39             'Links' => 'ARRAY[ResourceUri]'
40             };
41              
42             my $attribute_map = {
43             'Text' => 'Text',
44             'Paragraphs' => 'Paragraphs',
45             'ShapeType' => 'ShapeType',
46             'Name' => 'Name',
47             'Width' => 'Width',
48             'Height' => 'Height',
49             'AlternativeText' => 'AlternativeText',
50             'Hidden' => 'Hidden',
51             'X' => 'X',
52             'Y' => 'Y',
53             'ZOrderPosition' => 'ZOrderPosition',
54             'Shapes' => 'Shapes',
55             'FillFormat' => 'FillFormat',
56             'LineFormat' => 'LineFormat',
57             'SelfUri' => 'SelfUri',
58             'AlternateLinks' => 'AlternateLinks',
59             'Links' => 'Links'
60             };
61              
62             # new object
63             sub new {
64 0     0 0   my ($class, %args) = @_;
65             my $self = {
66             #
67             'Text' => $args{'Text'},
68             #
69             'Paragraphs' => $args{'Paragraphs'},
70             #
71             'ShapeType' => $args{'ShapeType'},
72             #
73             'Name' => $args{'Name'},
74             #
75             'Width' => $args{'Width'},
76             #
77             'Height' => $args{'Height'},
78             #
79             'AlternativeText' => $args{'AlternativeText'},
80             #
81             'Hidden' => $args{'Hidden'},
82             #
83             'X' => $args{'X'},
84             #
85             'Y' => $args{'Y'},
86             #
87             'ZOrderPosition' => $args{'ZOrderPosition'},
88             #
89             'Shapes' => $args{'Shapes'},
90             #
91             'FillFormat' => $args{'FillFormat'},
92             #
93             'LineFormat' => $args{'LineFormat'},
94             #
95             'SelfUri' => $args{'SelfUri'},
96             #
97             'AlternateLinks' => $args{'AlternateLinks'},
98             #
99 0           'Links' => $args{'Links'}
100             };
101              
102 0           return bless $self, $class;
103             }
104              
105             # get swagger type of the attribute
106             sub get_swagger_types {
107 0     0 0   return $swagger_types;
108             }
109              
110             # get attribute mappping
111             sub get_attribute_map {
112 0     0 0   return $attribute_map;
113             }
114              
115             1;