File Coverage

blib/lib/AsposeTasksCloud/Object/Calendar.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 AsposeTasksCloud::Object::Calendar;
2              
3             require 5.6.0;
4 1     1   691 use strict;
  1         2  
  1         32  
5 1     1   4 use warnings;
  1         2  
  1         30  
6 1     1   5 use utf8;
  1         1  
  1         7  
7 1     1   22 use JSON qw(decode_json);
  1         2  
  1         8  
8 1     1   174 use Data::Dumper;
  1         1  
  1         63  
9 1     1   5 use Module::Runtime qw(use_module);
  1         1  
  1         10  
10 1     1   73 use Log::Any qw($log);
  1         2  
  1         11  
11 1     1   740 use Date::Parse;
  1         4726  
  1         125  
12 1     1   986 use DateTime;
  1         415332  
  1         53  
13              
14 1     1   8 use base "AsposeTasksCloud::Object::BaseObject";
  1         2  
  1         557  
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             'Name' => 'string',
24             'Uid' => 'int',
25             'Days' => 'ARRAY[WeekDay]',
26             'Exceptions' => 'ARRAY[CalendarException]',
27             'IsBaseCalendar' => 'boolean',
28             'IsBaselineCalendar' => 'boolean'
29             };
30              
31             my $attribute_map = {
32             'Name' => 'Name',
33             'Uid' => 'Uid',
34             'Days' => 'Days',
35             'Exceptions' => 'Exceptions',
36             'IsBaseCalendar' => 'IsBaseCalendar',
37             'IsBaselineCalendar' => 'IsBaselineCalendar'
38             };
39              
40             # new object
41             sub new {
42 0     0 0   my ($class, %args) = @_;
43             my $self = {
44             #
45             'Name' => $args{'Name'},
46             #
47             'Uid' => $args{'Uid'},
48             #
49             'Days' => $args{'Days'},
50             #
51             'Exceptions' => $args{'Exceptions'},
52             #
53             'IsBaseCalendar' => $args{'IsBaseCalendar'},
54             #
55 0           'IsBaselineCalendar' => $args{'IsBaselineCalendar'}
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;