File Coverage

blib/lib/AsposeWordsCloud/Object/ProtectionRequest.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 AsposeWordsCloud::Object::ProtectionRequest;
2              
3             require 5.6.0;
4 1     1   271 use strict;
  1         2  
  1         23  
5 1     1   4 use warnings;
  1         2  
  1         19  
6 1     1   4 use utf8;
  1         2  
  1         4  
7 1     1   20 use JSON qw(decode_json);
  1         2  
  1         3  
8 1     1   78 use Data::Dumper;
  1         2  
  1         33  
9 1     1   5 use Module::Runtime qw(use_module);
  1         2  
  1         4  
10 1     1   54 use Log::Any qw($log);
  1         2  
  1         4  
11 1     1   162 use Date::Parse;
  1         3  
  1         74  
12 1     1   6 use DateTime;
  1         1  
  1         18  
13              
14 1     1   4 use base "AsposeWordsCloud::Object::BaseObject";
  1         1  
  1         156  
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             'Password' => 'string',
24             'NewPassword' => 'string',
25             'ProtectionType' => 'string'
26             };
27              
28             my $attribute_map = {
29             'Password' => 'Password',
30             'NewPassword' => 'NewPassword',
31             'ProtectionType' => 'ProtectionType'
32             };
33              
34             # new object
35             sub new {
36 0     0 0   my ($class, %args) = @_;
37             my $self = {
38             #
39             'Password' => $args{'Password'},
40             #
41             'NewPassword' => $args{'NewPassword'},
42             #
43 0           'ProtectionType' => $args{'ProtectionType'}
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;