File Coverage

blib/lib/AsposeEmailCloud/Object/EmailPropertyResponse.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 AsposeEmailCloud::Object::EmailPropertyResponse;
2              
3             require 5.6.0;
4 1     1   2443 use strict;
  1         2  
  1         30  
5 1     1   4 use warnings;
  1         1  
  1         24  
6 1     1   3 use utf8;
  1         2  
  1         5  
7 1     1   26 use JSON qw(decode_json);
  1         1  
  1         5  
8 1     1   100 use Data::Dumper;
  1         1  
  1         50  
9 1     1   4 use Module::Runtime qw(use_module);
  1         1  
  1         6  
10 1     1   49 use Log::Any qw($log);
  1         1  
  1         48  
11 1     1   213 use Date::Parse;
  1         2  
  1         130  
12 1     1   6 use DateTime;
  1         2  
  1         36  
13              
14 1     1   6 use base "AsposeEmailCloud::Object::BaseObject";
  1         2  
  1         218  
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             'EmailProperty' => 'EmailProperty',
24             'Code' => 'string',
25             'Status' => 'string'
26             };
27              
28             my $attribute_map = {
29             'EmailProperty' => 'EmailProperty',
30             'Code' => 'Code',
31             'Status' => 'Status'
32             };
33              
34             # new object
35             sub new {
36 0     0 0   my ($class, %args) = @_;
37             my $self = {
38             #
39             'EmailProperty' => $args{'EmailProperty'},
40             #
41             'Code' => $args{'Code'},
42             #
43 0           'Status' => $args{'Status'}
44             };
45              
46 0           return bless $self, $class;
47             }
48              
49             # get swagger type of the attribute
50             sub get_swagger_types {
51 0     0 0   return $swagger_types;
52             }
53              
54             # get attribute mappping
55             sub get_attribute_map {
56 0     0 0   return $attribute_map;
57             }
58              
59             1;