File Coverage

blib/lib/AsposeBarCodeCloud/Object/BarcodeBuilder.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 AsposeBarCodeCloud::Object::BarcodeBuilder;
2              
3             require 5.6.0;
4 1     1   348 use strict;
  1         2  
  1         24  
5 1     1   5 use warnings;
  1         2  
  1         34  
6 1     1   9 use utf8;
  1         3  
  1         5  
7 1     1   26 use JSON qw(decode_json);
  1         2  
  1         4  
8 1     1   480 use Data::Dumper;
  1         5820  
  1         86  
9 1     1   10 use Module::Runtime qw(use_module);
  1         3  
  1         10  
10 1     1   99 use Log::Any qw($log);
  1         3  
  1         10  
11 1     1   681 use Date::Parse;
  1         3814  
  1         98  
12 1     1   586 use DateTime;
  1         407149  
  1         44  
13              
14 1     1   8 use base "AsposeBarCodeCloud::Object::BaseObject";
  1         2  
  1         369  
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             'TypeOfBarcode' => 'string',
24             'Text' => 'string',
25             'Resolution' => 'Resolution',
26             'DimensionX' => 'int',
27             'DimensionY' => 'int',
28             'CodeLocation' => 'string',
29             'GraphicsUnit' => 'string',
30             'AutoSize' => 'boolean',
31             'BarHeight' => 'int',
32             'ImageHeight' => 'int',
33             'ImageWidth' => 'int',
34             'ImageQuality' => 'string',
35             'RotationAngle' => 'int',
36             'BackColor' => 'string',
37             'ForeColor' => 'string',
38             'CodeTextColor' => 'string',
39             'BorderColor' => 'string',
40             'EnableChecksum' => 'string',
41             'BorderVisible' => 'boolean',
42             'Margins' => 'Margins'
43            
44             };
45              
46             my $attribute_map = {
47             'TypeOfBarcode' => 'TypeOfBarcode',
48             'Text' => 'Text',
49             'Resolution' => 'Resolution',
50             'DimensionX' => 'DimensionX',
51             'DimensionY' => 'DimensionY',
52             'CodeLocation' => 'CodeLocation',
53             'GraphicsUnit' => 'GraphicsUnit',
54             'AutoSize' => 'AutoSize',
55             'BarHeight' => 'BarHeight',
56             'ImageHeight' => 'ImageHeight',
57             'ImageWidth' => 'ImageWidth',
58             'ImageQuality' => 'ImageQuality',
59             'RotationAngle' => 'RotationAngle',
60             'BackColor' => 'BackColor',
61             'ForeColor' => 'ForeColor',
62             'CodeTextColor' => 'CodeTextColor',
63             'BorderColor' => 'BorderColor',
64             'EnableChecksum' => 'EnableChecksum',
65             'BorderVisible' => 'BorderVisible',
66             'Margins' => 'Margins'
67             };
68              
69             # new object
70             sub new {
71 0     0 0   my ($class, %args) = @_;
72             my $self = {
73             'TypeOfBarcode' => $args{'TypeOfBarcode'},
74             'Text' => $args{'Text'},
75             'Resolution' => $args{'Resolution'},
76             'DimensionX' => $args{'DimensionX'},
77             'DimensionY' => $args{'DimensionY'},
78             'CodeLocation' => $args{'CodeLocation'},
79             'GraphicsUnit' => $args{'GraphicsUnit'},
80             'AutoSize' => $args{'AutoSize'},
81             'BarHeight' => $args{'BarHeight'},
82             'ImageHeight' => $args{'ImageHeight'},
83             'ImageWidth' => $args{'ImageWidth'},
84             'ImageQuality' => $args{'ImageQuality'},
85             'RotationAngle' => $args{'RotationAngle'},
86             'BackColor' => $args{'BackColor'},
87             'ForeColor' => $args{'ForeColor'},
88             'CodeTextColor' => $args{'CodeTextColor'},
89             'BorderColor' => $args{'BorderColor'},
90             'EnableChecksum' => $args{'EnableChecksum'},
91             'BorderVisible' => $args{'BorderVisible'},
92 0           'Margins' => $args{'Margins'}
93             };
94              
95 0           return bless $self, $class;
96             }
97              
98             # get swagger type of the attribute
99             sub get_swagger_types {
100 0     0 0   return $swagger_types;
101             }
102              
103             # get attribute mappping
104             sub get_attribute_map {
105 0     0 0   return $attribute_map;
106             }
107              
108             1;