File Coverage

blib/lib/AsposeStorageCloud/Object/FileVersion.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 AsposeStorageCloud::Object::FileVersion;
2              
3             require 5.6.0;
4 1     1   489 use strict;
  1         4  
  1         36  
5 1     1   8 use warnings;
  1         3  
  1         34  
6 1     1   9 use utf8;
  1         3  
  1         7  
7 1     1   38 use JSON qw(decode_json);
  1         3  
  1         7  
8 1     1   119 use Data::Dumper;
  1         3  
  1         56  
9 1     1   9 use Module::Runtime qw(use_module);
  1         3  
  1         13  
10 1     1   84 use Log::Any qw($log);
  1         3  
  1         7  
11 1     1   281 use Date::Parse;
  1         3  
  1         103  
12 1     1   8 use DateTime;
  1         3  
  1         36  
13              
14 1     1   7 use base "AsposeStorageCloud::Object::BaseObject";
  1         3  
  1         312  
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             'VersionId' => 'string',
24             'IsLatest' => 'boolean',
25             'Name' => 'string',
26             'IsFolder' => 'boolean',
27             'ModifiedDate' => 'string',
28             'Size' => 'int',
29             'Path' => 'string'
30             };
31              
32             my $attribute_map = {
33             'VersionId' => 'VersionId',
34             'IsLatest' => 'IsLatest',
35             'Name' => 'Name',
36             'IsFolder' => 'IsFolder',
37             'ModifiedDate' => 'ModifiedDate',
38             'Size' => 'Size',
39             'Path' => 'Path'
40             };
41              
42             # new object
43             sub new {
44 0     0 0   my ($class, %args) = @_;
45             my $self = {
46             #
47             'VersionId' => $args{'VersionId'},
48             #
49             'IsLatest' => $args{'IsLatest'},
50             #
51             'Name' => $args{'Name'},
52             #
53             'IsFolder' => $args{'IsFolder'},
54             #
55             'ModifiedDate' => $args{'ModifiedDate'},
56             #
57             'Size' => $args{'Size'},
58             #
59 0           'Path' => $args{'Path'}
60             };
61              
62 0           return bless $self, $class;
63             }
64              
65             # get swagger type of the attribute
66             sub get_swagger_types {
67 0     0 0   return $swagger_types;
68             }
69              
70             # get attribute mappping
71             sub get_attribute_map {
72 0     0 0   return $attribute_map;
73             }
74              
75             1;