| line | stmt | bran | cond | sub | pod | time | code | 
| 1 |  |  |  |  |  |  | package AsposeBarCodeCloud::BarcodeApi; | 
| 2 |  |  |  |  |  |  |  | 
| 3 |  |  |  |  |  |  | require 5.6.0; | 
| 4 | 1 |  |  | 1 |  | 187065 | use strict; | 
|  | 1 |  |  |  |  | 2 |  | 
|  | 1 |  |  |  |  | 29 |  | 
| 5 | 1 |  |  | 1 |  | 4 | use warnings; | 
|  | 1 |  |  |  |  | 2 |  | 
|  | 1 |  |  |  |  | 31 |  | 
| 6 | 1 |  |  | 1 |  | 4 | use utf8; | 
|  | 1 |  |  |  |  | 5 |  | 
|  | 1 |  |  |  |  | 7 |  | 
| 7 | 1 |  |  | 1 |  | 24 | use Exporter; | 
|  | 1 |  |  |  |  | 2 |  | 
|  | 1 |  |  |  |  | 57 |  | 
| 8 | 1 |  |  | 1 |  | 3 | use Carp qw( croak ); | 
|  | 1 |  |  |  |  | 2 |  | 
|  | 1 |  |  |  |  | 47 |  | 
| 9 | 1 |  |  | 1 |  | 4 | use Log::Any qw($log); | 
|  | 1 |  |  |  |  | 1 |  | 
|  | 1 |  |  |  |  | 7 |  | 
| 10 | 1 |  |  | 1 |  | 171 | use File::Slurp; | 
|  | 1 |  |  |  |  | 1 |  | 
|  | 1 |  |  |  |  | 64 |  | 
| 11 | 1 |  |  | 1 |  | 4 | use URI::Escape; | 
|  | 1 |  |  |  |  | 2 |  | 
|  | 1 |  |  |  |  | 49 |  | 
| 12 |  |  |  |  |  |  |  | 
| 13 | 1 |  |  | 1 |  | 410 | use AsposeBarCodeCloud::ApiClient; | 
|  | 1 |  |  |  |  | 2 |  | 
|  | 1 |  |  |  |  | 29 |  | 
| 14 | 1 |  |  | 1 |  | 6 | use AsposeBarCodeCloud::Configuration; | 
|  | 1 |  |  |  |  | 1 |  | 
|  | 1 |  |  |  |  | 4553 |  | 
| 15 |  |  |  |  |  |  |  | 
| 16 |  |  |  |  |  |  | my $VERSION = '1.02'; | 
| 17 |  |  |  |  |  |  |  | 
| 18 |  |  |  |  |  |  | sub new { | 
| 19 | 0 |  |  | 0 | 0 |  | my $class   = shift; | 
| 20 | 0 | 0 |  |  |  |  | my $default_api_client = $AsposeBarCodeCloud::Configuration::api_client ? $AsposeBarCodeCloud::Configuration::api_client  : | 
| 21 |  |  |  |  |  |  | AsposeBarCodeCloud::ApiClient->new; | 
| 22 | 0 |  |  |  |  |  | my (%self) = ( | 
| 23 |  |  |  |  |  |  | 'api_client' => $default_api_client, | 
| 24 |  |  |  |  |  |  | @_ | 
| 25 |  |  |  |  |  |  | ); | 
| 26 |  |  |  |  |  |  |  | 
| 27 |  |  |  |  |  |  | #my $self = { | 
| 28 |  |  |  |  |  |  | #    #api_client => $options->{api_client} | 
| 29 |  |  |  |  |  |  | #    api_client => $default_api_client | 
| 30 |  |  |  |  |  |  | #}; | 
| 31 |  |  |  |  |  |  |  | 
| 32 | 0 |  |  |  |  |  | bless \%self, $class; | 
| 33 |  |  |  |  |  |  |  | 
| 34 |  |  |  |  |  |  | } | 
| 35 |  |  |  |  |  |  |  | 
| 36 |  |  |  |  |  |  | # | 
| 37 |  |  |  |  |  |  | # GetBarcodeGenerate | 
| 38 |  |  |  |  |  |  | # | 
| 39 |  |  |  |  |  |  | # Generate barcode. | 
| 40 |  |  |  |  |  |  | # | 
| 41 |  |  |  |  |  |  | # @param String $text The code text. (optional) | 
| 42 |  |  |  |  |  |  | # @param String $type Barcode type. (optional) | 
| 43 |  |  |  |  |  |  | # @param String $format Result format. (optional) | 
| 44 |  |  |  |  |  |  | # @param String $resolutionX Horizontal resolution. (optional) | 
| 45 |  |  |  |  |  |  | # @param String $resolutionY Vertical resolution. (optional) | 
| 46 |  |  |  |  |  |  | # @param String $dimensionX Smallest width of barcode unit (bar or space). (optional) | 
| 47 |  |  |  |  |  |  | # @param String $dimensionY Smallest height of barcode unit (for 2D barcodes). (optional) | 
| 48 |  |  |  |  |  |  | # @param String $enableChecksum Sets if checksum will be generated. (optional) | 
| 49 |  |  |  |  |  |  | # @return ResponseMessage | 
| 50 |  |  |  |  |  |  | # | 
| 51 |  |  |  |  |  |  | sub GetBarcodeGenerate { | 
| 52 | 0 |  |  | 0 | 0 |  | my ($self, %args) = @_; | 
| 53 |  |  |  |  |  |  |  | 
| 54 |  |  |  |  |  |  |  | 
| 55 |  |  |  |  |  |  |  | 
| 56 |  |  |  |  |  |  | # parse inputs | 
| 57 | 0 |  |  |  |  |  | my $_resource_path = '/barcode/generate/?appSid={appSid}&text={text}&type={type}&toFormat={toFormat}&resolutionX={resolutionX}&resolutionY={resolutionY}&dimensionX={dimensionX}&dimensionY={dimensionY}&enableChecksum={enableChecksum}'; | 
| 58 |  |  |  |  |  |  |  | 
| 59 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q&\E/&/g; | 
| 60 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q\/?\E/?/g; | 
| 61 | 0 |  |  |  |  |  | $_resource_path =~ s/\QtoFormat={toFormat}\E/format={format}/g; | 
| 62 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{path}\E/{Path}/g; | 
| 63 |  |  |  |  |  |  |  | 
| 64 | 0 |  |  |  |  |  | my $_method = 'GET'; | 
| 65 | 0 |  |  |  |  |  | my $query_params = {}; | 
| 66 | 0 |  |  |  |  |  | my $header_params = {}; | 
| 67 | 0 |  |  |  |  |  | my $form_params = {}; | 
| 68 |  |  |  |  |  |  |  | 
| 69 |  |  |  |  |  |  | # 'Accept' and 'Content-Type' header | 
| 70 | 0 |  |  |  |  |  | my $_header_accept = $self->{api_client}->select_header_accept('application/xml', 'application/octet-stream'); | 
| 71 | 0 | 0 |  |  |  |  | if ($_header_accept) { | 
| 72 | 0 |  |  |  |  |  | $header_params->{'Accept'} = $_header_accept; | 
| 73 |  |  |  |  |  |  | } | 
| 74 | 0 |  |  |  |  |  | $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); | 
| 75 |  |  |  |  |  |  |  | 
| 76 |  |  |  |  |  |  | # query params | 
| 77 | 0 | 0 |  |  |  |  | if ( exists $args{'text'}) { | 
| 78 | 0 |  |  |  |  |  | my $escapedText = uri_escape( $args{'text'} ); | 
| 79 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{text}\E/$escapedText/g; | 
| 80 |  |  |  |  |  |  | }else{ | 
| 81 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]text.*?(?=&|\?|$)//g; | 
| 82 |  |  |  |  |  |  | }# query params | 
| 83 | 0 | 0 |  |  |  |  | if ( exists $args{'type'}) { | 
| 84 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{type}\E/$args{'type'}/g; | 
| 85 |  |  |  |  |  |  | }else{ | 
| 86 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]type.*?(?=&|\?|$)//g; | 
| 87 |  |  |  |  |  |  | }# query params | 
| 88 | 0 | 0 |  |  |  |  | if ( exists $args{'format'}) { | 
| 89 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{format}\E/$args{'format'}/g; | 
| 90 |  |  |  |  |  |  | }else{ | 
| 91 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]format.*?(?=&|\?|$)//g; | 
| 92 |  |  |  |  |  |  | }# query params | 
| 93 | 0 | 0 |  |  |  |  | if ( exists $args{'resolutionX'}) { | 
| 94 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{resolutionX}\E/$args{'resolutionX'}/g; | 
| 95 |  |  |  |  |  |  | }else{ | 
| 96 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]resolutionX.*?(?=&|\?|$)//g; | 
| 97 |  |  |  |  |  |  | }# query params | 
| 98 | 0 | 0 |  |  |  |  | if ( exists $args{'resolutionY'}) { | 
| 99 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{resolutionY}\E/$args{'resolutionY'}/g; | 
| 100 |  |  |  |  |  |  | }else{ | 
| 101 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]resolutionY.*?(?=&|\?|$)//g; | 
| 102 |  |  |  |  |  |  | }# query params | 
| 103 | 0 | 0 |  |  |  |  | if ( exists $args{'dimensionX'}) { | 
| 104 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{dimensionX}\E/$args{'dimensionX'}/g; | 
| 105 |  |  |  |  |  |  | }else{ | 
| 106 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]dimensionX.*?(?=&|\?|$)//g; | 
| 107 |  |  |  |  |  |  | }# query params | 
| 108 | 0 | 0 |  |  |  |  | if ( exists $args{'dimensionY'}) { | 
| 109 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{dimensionY}\E/$args{'dimensionY'}/g; | 
| 110 |  |  |  |  |  |  | }else{ | 
| 111 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]dimensionY.*?(?=&|\?|$)//g; | 
| 112 |  |  |  |  |  |  | }# query params | 
| 113 | 0 | 0 |  |  |  |  | if ( exists $args{'enableChecksum'}) { | 
| 114 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{enableChecksum}\E/$args{'enableChecksum'}/g; | 
| 115 |  |  |  |  |  |  | }else{ | 
| 116 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]enableChecksum.*?(?=&|\?|$)//g; | 
| 117 |  |  |  |  |  |  | } | 
| 118 |  |  |  |  |  |  |  | 
| 119 |  |  |  |  |  |  |  | 
| 120 | 0 |  |  |  |  |  | my $_body_data; | 
| 121 |  |  |  |  |  |  |  | 
| 122 |  |  |  |  |  |  |  | 
| 123 |  |  |  |  |  |  |  | 
| 124 |  |  |  |  |  |  |  | 
| 125 |  |  |  |  |  |  | # authentication setting, if any | 
| 126 | 0 |  |  |  |  |  | my $auth_settings = []; | 
| 127 |  |  |  |  |  |  |  | 
| 128 |  |  |  |  |  |  | # make the API Call | 
| 129 | 0 |  |  |  |  |  | my $response = $self->{api_client}->call_api($_resource_path, $_method, | 
| 130 |  |  |  |  |  |  | $query_params, $form_params, | 
| 131 |  |  |  |  |  |  | $header_params, $_body_data, $auth_settings); | 
| 132 | 0 | 0 |  |  |  |  | if (!$response) { | 
| 133 | 0 |  |  |  |  |  | return; | 
| 134 |  |  |  |  |  |  | } | 
| 135 |  |  |  |  |  |  |  | 
| 136 | 0 | 0 |  |  |  |  | if($AsposeBarCodeCloud::Configuration::debug){ | 
| 137 | 0 |  |  |  |  |  | print "\nResponse Content: ".$response->content; | 
| 138 |  |  |  |  |  |  | } | 
| 139 |  |  |  |  |  |  |  | 
| 140 | 0 |  |  |  |  |  | my $_response_object = $self->{api_client}->pre_deserialize($response->content, 'ResponseMessage', $response->header('content-type')); | 
| 141 | 0 |  |  |  |  |  | return $_response_object; | 
| 142 |  |  |  |  |  |  |  | 
| 143 |  |  |  |  |  |  | } | 
| 144 |  |  |  |  |  |  | # | 
| 145 |  |  |  |  |  |  | # PostGenerateMultiple | 
| 146 |  |  |  |  |  |  | # | 
| 147 |  |  |  |  |  |  | # Generate multiple barcodes and return in response stream | 
| 148 |  |  |  |  |  |  | # | 
| 149 |  |  |  |  |  |  | # @param String $format Format to return stream in (optional) | 
| 150 |  |  |  |  |  |  | # @param BarcodeBuildersList $body  (required) | 
| 151 |  |  |  |  |  |  | # @return ResponseMessage | 
| 152 |  |  |  |  |  |  | # | 
| 153 |  |  |  |  |  |  | sub PostGenerateMultiple { | 
| 154 | 0 |  |  | 0 | 0 |  | my ($self, %args) = @_; | 
| 155 |  |  |  |  |  |  |  | 
| 156 |  |  |  |  |  |  |  | 
| 157 |  |  |  |  |  |  | # verify the required parameter 'body' is set | 
| 158 | 0 | 0 |  |  |  |  | unless (exists $args{'body'}) { | 
| 159 | 0 |  |  |  |  |  | croak("Missing the required parameter 'body' when calling PutSlidesSetDocumentProperty"); | 
| 160 |  |  |  |  |  |  | } | 
| 161 |  |  |  |  |  |  |  | 
| 162 |  |  |  |  |  |  | # parse inputs | 
| 163 | 0 |  |  |  |  |  | my $_resource_path = '/barcode/generateMultiple/?appSid={appSid}&toFormat={toFormat}'; | 
| 164 |  |  |  |  |  |  |  | 
| 165 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q&\E/&/g; | 
| 166 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q\/?\E/?/g; | 
| 167 | 0 |  |  |  |  |  | $_resource_path =~ s/\QtoFormat={toFormat}\E/format={format}/g; | 
| 168 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{path}\E/{Path}/g; | 
| 169 |  |  |  |  |  |  |  | 
| 170 | 0 |  |  |  |  |  | my $_method = 'POST'; | 
| 171 | 0 |  |  |  |  |  | my $query_params = {}; | 
| 172 | 0 |  |  |  |  |  | my $header_params = {}; | 
| 173 | 0 |  |  |  |  |  | my $form_params = {}; | 
| 174 |  |  |  |  |  |  |  | 
| 175 |  |  |  |  |  |  | # 'Accept' and 'Content-Type' header | 
| 176 | 0 |  |  |  |  |  | my $_header_accept = $self->{api_client}->select_header_accept('application/xml', 'application/octet-stream'); | 
| 177 | 0 | 0 |  |  |  |  | if ($_header_accept) { | 
| 178 | 0 |  |  |  |  |  | $header_params->{'Accept'} = $_header_accept; | 
| 179 |  |  |  |  |  |  | } | 
| 180 | 0 |  |  |  |  |  | $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); | 
| 181 |  |  |  |  |  |  |  | 
| 182 |  |  |  |  |  |  | # query params | 
| 183 | 0 | 0 |  |  |  |  | if ( exists $args{'format'}) { | 
| 184 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{format}\E/$args{'format'}/g; | 
| 185 |  |  |  |  |  |  | }else{ | 
| 186 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]format.*?(?=&|\?|$)//g; | 
| 187 |  |  |  |  |  |  | } | 
| 188 |  |  |  |  |  |  |  | 
| 189 |  |  |  |  |  |  |  | 
| 190 | 0 |  |  |  |  |  | my $_body_data; | 
| 191 |  |  |  |  |  |  |  | 
| 192 |  |  |  |  |  |  |  | 
| 193 |  |  |  |  |  |  | # body params | 
| 194 | 0 | 0 |  |  |  |  | if ( exists $args{'body'}) { | 
| 195 | 0 |  |  |  |  |  | $_body_data = $args{'body'}; | 
| 196 |  |  |  |  |  |  | } | 
| 197 |  |  |  |  |  |  |  | 
| 198 |  |  |  |  |  |  |  | 
| 199 |  |  |  |  |  |  | # authentication setting, if any | 
| 200 | 0 |  |  |  |  |  | my $auth_settings = []; | 
| 201 |  |  |  |  |  |  |  | 
| 202 |  |  |  |  |  |  | # make the API Call | 
| 203 | 0 |  |  |  |  |  | my $response = $self->{api_client}->call_api($_resource_path, $_method, | 
| 204 |  |  |  |  |  |  | $query_params, $form_params, | 
| 205 |  |  |  |  |  |  | $header_params, $_body_data, $auth_settings); | 
| 206 | 0 | 0 |  |  |  |  | if (!$response) { | 
| 207 | 0 |  |  |  |  |  | return; | 
| 208 |  |  |  |  |  |  | } | 
| 209 |  |  |  |  |  |  |  | 
| 210 | 0 | 0 |  |  |  |  | if($AsposeBarCodeCloud::Configuration::debug){ | 
| 211 | 0 |  |  |  |  |  | print "\nResponse Content: ".$response->content; | 
| 212 |  |  |  |  |  |  | } | 
| 213 |  |  |  |  |  |  |  | 
| 214 | 0 |  |  |  |  |  | my $_response_object = $self->{api_client}->pre_deserialize($response->content, 'ResponseMessage', $response->header('content-type')); | 
| 215 | 0 |  |  |  |  |  | return $_response_object; | 
| 216 |  |  |  |  |  |  |  | 
| 217 |  |  |  |  |  |  | } | 
| 218 |  |  |  |  |  |  | # | 
| 219 |  |  |  |  |  |  | # PostBarcodeRecognizeFromUrlorContent | 
| 220 |  |  |  |  |  |  | # | 
| 221 |  |  |  |  |  |  | # Recognize barcode from an url. | 
| 222 |  |  |  |  |  |  | # | 
| 223 |  |  |  |  |  |  | # @param String $type Barcode type. (optional) | 
| 224 |  |  |  |  |  |  | # @param String $checksumValidation Checksum validation parameter. (optional) | 
| 225 |  |  |  |  |  |  | # @param Boolean $stripFnc Allows to strip FNC symbol in recognition results. (optional) | 
| 226 |  |  |  |  |  |  | # @param String $rotationAngle Recognition of rotated barcode. Possible angles are 90, 180, 270, default is 0 (optional) | 
| 227 |  |  |  |  |  |  | # @param String $url The image file url. (optional) | 
| 228 |  |  |  |  |  |  | # @param File $file  (required) | 
| 229 |  |  |  |  |  |  | # @return BarcodeResponseList | 
| 230 |  |  |  |  |  |  | # | 
| 231 |  |  |  |  |  |  | sub PostBarcodeRecognizeFromUrlorContent { | 
| 232 | 0 |  |  | 0 | 0 |  | my ($self, %args) = @_; | 
| 233 |  |  |  |  |  |  |  | 
| 234 |  |  |  |  |  |  |  | 
| 235 |  |  |  |  |  |  | # verify the required parameter 'file' is set | 
| 236 |  |  |  |  |  |  | #unless (exists $args{'file'}) { | 
| 237 |  |  |  |  |  |  | # croak("Missing the required parameter 'file' when calling PostBarcodeRecognizeFromUrlorContent"); | 
| 238 |  |  |  |  |  |  | #} | 
| 239 |  |  |  |  |  |  |  | 
| 240 |  |  |  |  |  |  |  | 
| 241 |  |  |  |  |  |  | # parse inputs | 
| 242 | 0 |  |  |  |  |  | my $_resource_path = '/barcode/recognize/?appSid={appSid}&type={type}&checksumValidation={checksumValidation}&stripFnc={stripFnc}&rotationAngle={rotationAngle}&url={url}'; | 
| 243 |  |  |  |  |  |  |  | 
| 244 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q&\E/&/g; | 
| 245 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q\/?\E/?/g; | 
| 246 | 0 |  |  |  |  |  | $_resource_path =~ s/\QtoFormat={toFormat}\E/format={format}/g; | 
| 247 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{path}\E/{Path}/g; | 
| 248 |  |  |  |  |  |  |  | 
| 249 | 0 |  |  |  |  |  | my $_method = 'POST'; | 
| 250 | 0 |  |  |  |  |  | my $query_params = {}; | 
| 251 | 0 |  |  |  |  |  | my $header_params = {}; | 
| 252 | 0 |  |  |  |  |  | my $form_params = {}; | 
| 253 |  |  |  |  |  |  |  | 
| 254 |  |  |  |  |  |  | # 'Accept' and 'Content-Type' header | 
| 255 | 0 |  |  |  |  |  | my $_header_accept = $self->{api_client}->select_header_accept('application/xml', 'application/json'); | 
| 256 | 0 | 0 |  |  |  |  | if ($_header_accept) { | 
| 257 | 0 |  |  |  |  |  | $header_params->{'Accept'} = $_header_accept; | 
| 258 |  |  |  |  |  |  | } | 
| 259 | 0 |  |  |  |  |  | $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('multipart/form-data'); | 
| 260 |  |  |  |  |  |  |  | 
| 261 |  |  |  |  |  |  | # query params | 
| 262 | 0 | 0 |  |  |  |  | if ( exists $args{'type'}) { | 
| 263 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{type}\E/$args{'type'}/g; | 
| 264 |  |  |  |  |  |  | }else{ | 
| 265 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]type.*?(?=&|\?|$)//g; | 
| 266 |  |  |  |  |  |  | }# query params | 
| 267 | 0 | 0 |  |  |  |  | if ( exists $args{'checksumValidation'}) { | 
| 268 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{checksumValidation}\E/$args{'checksumValidation'}/g; | 
| 269 |  |  |  |  |  |  | }else{ | 
| 270 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]checksumValidation.*?(?=&|\?|$)//g; | 
| 271 |  |  |  |  |  |  | }# query params | 
| 272 | 0 | 0 |  |  |  |  | if ( exists $args{'stripFnc'}) { | 
| 273 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{stripFnc}\E/$args{'stripFnc'}/g; | 
| 274 |  |  |  |  |  |  | }else{ | 
| 275 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]stripFnc.*?(?=&|\?|$)//g; | 
| 276 |  |  |  |  |  |  | }# query params | 
| 277 | 0 | 0 |  |  |  |  | if ( exists $args{'rotationAngle'}) { | 
| 278 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{rotationAngle}\E/$args{'rotationAngle'}/g; | 
| 279 |  |  |  |  |  |  | }else{ | 
| 280 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]rotationAngle.*?(?=&|\?|$)//g; | 
| 281 |  |  |  |  |  |  | }# query params | 
| 282 | 0 | 0 |  |  |  |  | if ( exists $args{'url'}) { | 
| 283 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{url}\E/$args{'url'}/g; | 
| 284 |  |  |  |  |  |  | }else{ | 
| 285 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]url.*?(?=&|\?|$)//g; | 
| 286 |  |  |  |  |  |  | } | 
| 287 |  |  |  |  |  |  |  | 
| 288 |  |  |  |  |  |  |  | 
| 289 | 0 |  |  |  |  |  | my $_body_data; | 
| 290 |  |  |  |  |  |  | # form params | 
| 291 | 0 | 0 |  |  |  |  | if ( exists $args{'file'} ) { | 
| 292 |  |  |  |  |  |  |  | 
| 293 | 0 |  |  |  |  |  | $_body_data = read_file( $args{'file'} , binmode => ':raw' ); | 
| 294 |  |  |  |  |  |  |  | 
| 295 |  |  |  |  |  |  |  | 
| 296 |  |  |  |  |  |  | } | 
| 297 |  |  |  |  |  |  |  | 
| 298 |  |  |  |  |  |  |  | 
| 299 |  |  |  |  |  |  |  | 
| 300 |  |  |  |  |  |  | # authentication setting, if any | 
| 301 | 0 |  |  |  |  |  | my $auth_settings = []; | 
| 302 |  |  |  |  |  |  |  | 
| 303 |  |  |  |  |  |  | # make the API Call | 
| 304 | 0 |  |  |  |  |  | my $response = $self->{api_client}->call_api($_resource_path, $_method, | 
| 305 |  |  |  |  |  |  | $query_params, $form_params, | 
| 306 |  |  |  |  |  |  | $header_params, $_body_data, $auth_settings); | 
| 307 | 0 | 0 |  |  |  |  | if (!$response) { | 
| 308 | 0 |  |  |  |  |  | return; | 
| 309 |  |  |  |  |  |  | } | 
| 310 |  |  |  |  |  |  |  | 
| 311 | 0 | 0 |  |  |  |  | if($AsposeBarCodeCloud::Configuration::debug){ | 
| 312 | 0 |  |  |  |  |  | print "\nResponse Content: ".$response->content; | 
| 313 |  |  |  |  |  |  | } | 
| 314 |  |  |  |  |  |  |  | 
| 315 | 0 |  |  |  |  |  | my $_response_object = $self->{api_client}->pre_deserialize($response->content, 'BarcodeResponseList', $response->header('content-type')); | 
| 316 | 0 |  |  |  |  |  | return $_response_object; | 
| 317 |  |  |  |  |  |  |  | 
| 318 |  |  |  |  |  |  | } | 
| 319 |  |  |  |  |  |  | # | 
| 320 |  |  |  |  |  |  | # PutBarcodeGenerateFile | 
| 321 |  |  |  |  |  |  | # | 
| 322 |  |  |  |  |  |  | # Generate barcode and save on server. | 
| 323 |  |  |  |  |  |  | # | 
| 324 |  |  |  |  |  |  | # @param String $name The image name. (required) | 
| 325 |  |  |  |  |  |  | # @param String $text Barcode's text. (optional) | 
| 326 |  |  |  |  |  |  | # @param String $type The barcode type. (optional) | 
| 327 |  |  |  |  |  |  | # @param String $format The image format. (optional) | 
| 328 |  |  |  |  |  |  | # @param String $resolutionX Horizontal resolution. (optional) | 
| 329 |  |  |  |  |  |  | # @param String $resolutionY Vertical resolution. (optional) | 
| 330 |  |  |  |  |  |  | # @param String $dimensionX Smallest width of barcode unit (bar or space). (optional) | 
| 331 |  |  |  |  |  |  | # @param String $dimensionY Smallest height of barcode unit (for 2D barcodes). (optional) | 
| 332 |  |  |  |  |  |  | # @param String $codeLocation property of the barcode. (optional) | 
| 333 |  |  |  |  |  |  | # @param String $grUnit Measurement of barcode properties. (optional) | 
| 334 |  |  |  |  |  |  | # @param String $autoSize Sets if barcode size will be updated automatically. (optional) | 
| 335 |  |  |  |  |  |  | # @param String $barHeight Height of the bar. (optional) | 
| 336 |  |  |  |  |  |  | # @param String $imageHeight Height of the image. (optional) | 
| 337 |  |  |  |  |  |  | # @param String $imageWidth Width of the image. (optional) | 
| 338 |  |  |  |  |  |  | # @param String $imageQuality Detepmines  of the barcode image. (optional) | 
| 339 |  |  |  |  |  |  | # @param String $rotAngle Angle of barcode orientation. (optional) | 
| 340 |  |  |  |  |  |  | # @param String $topMargin Top margin. (optional) | 
| 341 |  |  |  |  |  |  | # @param String $bottomMargin Bottom margin. (optional) | 
| 342 |  |  |  |  |  |  | # @param String $leftMargin Left margin. (optional) | 
| 343 |  |  |  |  |  |  | # @param String $rightMargin Right margin. (optional) | 
| 344 |  |  |  |  |  |  | # @param String $enableChecksum Sets if checksum will be generated. (optional) | 
| 345 |  |  |  |  |  |  | # @param String $storage Image's storage. (optional) | 
| 346 |  |  |  |  |  |  | # @param String $folder Image's folder. (optional) | 
| 347 |  |  |  |  |  |  | # @param File $file  (required) | 
| 348 |  |  |  |  |  |  | # @return SaaSposeResponse | 
| 349 |  |  |  |  |  |  | # | 
| 350 |  |  |  |  |  |  | sub PutBarcodeGenerateFile { | 
| 351 | 0 |  |  | 0 | 0 |  | my ($self, %args) = @_; | 
| 352 |  |  |  |  |  |  |  | 
| 353 |  |  |  |  |  |  |  | 
| 354 |  |  |  |  |  |  | # verify the required parameter 'name' is set | 
| 355 | 0 | 0 |  |  |  |  | unless (exists $args{'name'}) { | 
| 356 | 0 |  |  |  |  |  | croak("Missing the required parameter 'name' when calling PutBarcodeGenerateFile"); | 
| 357 |  |  |  |  |  |  | } | 
| 358 |  |  |  |  |  |  |  | 
| 359 |  |  |  |  |  |  | # verify the required parameter 'file' is set | 
| 360 |  |  |  |  |  |  | #unless (exists $args{'file'}) { | 
| 361 |  |  |  |  |  |  | # croak("Missing the required parameter 'file' when calling PutBarcodeGenerateFile"); | 
| 362 |  |  |  |  |  |  | #} | 
| 363 |  |  |  |  |  |  |  | 
| 364 |  |  |  |  |  |  |  | 
| 365 |  |  |  |  |  |  | # parse inputs | 
| 366 | 0 |  |  |  |  |  | my $_resource_path = '/barcode/{name}/generate/?appSid={appSid}&text={text}&type={type}&toFormat={toFormat}&resolutionX={resolutionX}&resolutionY={resolutionY}&dimensionX={dimensionX}&dimensionY={dimensionY}&codeLocation={codeLocation}&grUnit={grUnit}&autoSize={autoSize}&barHeight={barHeight}&imageHeight={imageHeight}&imageWidth={imageWidth}&imageQuality={imageQuality}&rotAngle={rotAngle}&topMargin={topMargin}&bottomMargin={bottomMargin}&leftMargin={leftMargin}&rightMargin={rightMargin}&enableChecksum={enableChecksum}&storage={storage}&folder={folder}'; | 
| 367 |  |  |  |  |  |  |  | 
| 368 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q&\E/&/g; | 
| 369 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q\/?\E/?/g; | 
| 370 | 0 |  |  |  |  |  | $_resource_path =~ s/\QtoFormat={toFormat}\E/format={format}/g; | 
| 371 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{path}\E/{Path}/g; | 
| 372 |  |  |  |  |  |  |  | 
| 373 | 0 |  |  |  |  |  | my $_method = 'PUT'; | 
| 374 | 0 |  |  |  |  |  | my $query_params = {}; | 
| 375 | 0 |  |  |  |  |  | my $header_params = {}; | 
| 376 | 0 |  |  |  |  |  | my $form_params = {}; | 
| 377 |  |  |  |  |  |  |  | 
| 378 |  |  |  |  |  |  | # 'Accept' and 'Content-Type' header | 
| 379 | 0 |  |  |  |  |  | my $_header_accept = $self->{api_client}->select_header_accept('application/xml', 'application/json'); | 
| 380 | 0 | 0 |  |  |  |  | if ($_header_accept) { | 
| 381 | 0 |  |  |  |  |  | $header_params->{'Accept'} = $_header_accept; | 
| 382 |  |  |  |  |  |  | } | 
| 383 | 0 |  |  |  |  |  | $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('multipart/form-data'); | 
| 384 |  |  |  |  |  |  |  | 
| 385 |  |  |  |  |  |  | # query params | 
| 386 | 0 | 0 |  |  |  |  | if ( exists $args{'name'}) { | 
| 387 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{name}\E/$args{'name'}/g; | 
| 388 |  |  |  |  |  |  | }else{ | 
| 389 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]name.*?(?=&|\?|$)//g; | 
| 390 |  |  |  |  |  |  | }# query params | 
| 391 | 0 | 0 |  |  |  |  | if ( exists $args{'text'}) { | 
| 392 | 0 |  |  |  |  |  | my $escapedText = uri_escape( $args{'text'} ); | 
| 393 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{text}\E/$escapedText/g; | 
| 394 |  |  |  |  |  |  | }else{ | 
| 395 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]text.*?(?=&|\?|$)//g; | 
| 396 |  |  |  |  |  |  | }# query params | 
| 397 | 0 | 0 |  |  |  |  | if ( exists $args{'type'}) { | 
| 398 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{type}\E/$args{'type'}/g; | 
| 399 |  |  |  |  |  |  | }else{ | 
| 400 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]type.*?(?=&|\?|$)//g; | 
| 401 |  |  |  |  |  |  | }# query params | 
| 402 | 0 | 0 |  |  |  |  | if ( exists $args{'format'}) { | 
| 403 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{format}\E/$args{'format'}/g; | 
| 404 |  |  |  |  |  |  | }else{ | 
| 405 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]format.*?(?=&|\?|$)//g; | 
| 406 |  |  |  |  |  |  | }# query params | 
| 407 | 0 | 0 |  |  |  |  | if ( exists $args{'resolutionX'}) { | 
| 408 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{resolutionX}\E/$args{'resolutionX'}/g; | 
| 409 |  |  |  |  |  |  | }else{ | 
| 410 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]resolutionX.*?(?=&|\?|$)//g; | 
| 411 |  |  |  |  |  |  | }# query params | 
| 412 | 0 | 0 |  |  |  |  | if ( exists $args{'resolutionY'}) { | 
| 413 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{resolutionY}\E/$args{'resolutionY'}/g; | 
| 414 |  |  |  |  |  |  | }else{ | 
| 415 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]resolutionY.*?(?=&|\?|$)//g; | 
| 416 |  |  |  |  |  |  | }# query params | 
| 417 | 0 | 0 |  |  |  |  | if ( exists $args{'dimensionX'}) { | 
| 418 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{dimensionX}\E/$args{'dimensionX'}/g; | 
| 419 |  |  |  |  |  |  | }else{ | 
| 420 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]dimensionX.*?(?=&|\?|$)//g; | 
| 421 |  |  |  |  |  |  | }# query params | 
| 422 | 0 | 0 |  |  |  |  | if ( exists $args{'dimensionY'}) { | 
| 423 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{dimensionY}\E/$args{'dimensionY'}/g; | 
| 424 |  |  |  |  |  |  | }else{ | 
| 425 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]dimensionY.*?(?=&|\?|$)//g; | 
| 426 |  |  |  |  |  |  | }# query params | 
| 427 | 0 | 0 |  |  |  |  | if ( exists $args{'codeLocation'}) { | 
| 428 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{codeLocation}\E/$args{'codeLocation'}/g; | 
| 429 |  |  |  |  |  |  | }else{ | 
| 430 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]codeLocation.*?(?=&|\?|$)//g; | 
| 431 |  |  |  |  |  |  | }# query params | 
| 432 | 0 | 0 |  |  |  |  | if ( exists $args{'grUnit'}) { | 
| 433 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{grUnit}\E/$args{'grUnit'}/g; | 
| 434 |  |  |  |  |  |  | }else{ | 
| 435 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]grUnit.*?(?=&|\?|$)//g; | 
| 436 |  |  |  |  |  |  | }# query params | 
| 437 | 0 | 0 |  |  |  |  | if ( exists $args{'autoSize'}) { | 
| 438 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{autoSize}\E/$args{'autoSize'}/g; | 
| 439 |  |  |  |  |  |  | }else{ | 
| 440 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]autoSize.*?(?=&|\?|$)//g; | 
| 441 |  |  |  |  |  |  | }# query params | 
| 442 | 0 | 0 |  |  |  |  | if ( exists $args{'barHeight'}) { | 
| 443 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{barHeight}\E/$args{'barHeight'}/g; | 
| 444 |  |  |  |  |  |  | }else{ | 
| 445 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]barHeight.*?(?=&|\?|$)//g; | 
| 446 |  |  |  |  |  |  | }# query params | 
| 447 | 0 | 0 |  |  |  |  | if ( exists $args{'imageHeight'}) { | 
| 448 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{imageHeight}\E/$args{'imageHeight'}/g; | 
| 449 |  |  |  |  |  |  | }else{ | 
| 450 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]imageHeight.*?(?=&|\?|$)//g; | 
| 451 |  |  |  |  |  |  | }# query params | 
| 452 | 0 | 0 |  |  |  |  | if ( exists $args{'imageWidth'}) { | 
| 453 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{imageWidth}\E/$args{'imageWidth'}/g; | 
| 454 |  |  |  |  |  |  | }else{ | 
| 455 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]imageWidth.*?(?=&|\?|$)//g; | 
| 456 |  |  |  |  |  |  | }# query params | 
| 457 | 0 | 0 |  |  |  |  | if ( exists $args{'imageQuality'}) { | 
| 458 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{imageQuality}\E/$args{'imageQuality'}/g; | 
| 459 |  |  |  |  |  |  | }else{ | 
| 460 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]imageQuality.*?(?=&|\?|$)//g; | 
| 461 |  |  |  |  |  |  | }# query params | 
| 462 | 0 | 0 |  |  |  |  | if ( exists $args{'rotAngle'}) { | 
| 463 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{rotAngle}\E/$args{'rotAngle'}/g; | 
| 464 |  |  |  |  |  |  | }else{ | 
| 465 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]rotAngle.*?(?=&|\?|$)//g; | 
| 466 |  |  |  |  |  |  | }# query params | 
| 467 | 0 | 0 |  |  |  |  | if ( exists $args{'topMargin'}) { | 
| 468 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{topMargin}\E/$args{'topMargin'}/g; | 
| 469 |  |  |  |  |  |  | }else{ | 
| 470 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]topMargin.*?(?=&|\?|$)//g; | 
| 471 |  |  |  |  |  |  | }# query params | 
| 472 | 0 | 0 |  |  |  |  | if ( exists $args{'bottomMargin'}) { | 
| 473 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{bottomMargin}\E/$args{'bottomMargin'}/g; | 
| 474 |  |  |  |  |  |  | }else{ | 
| 475 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]bottomMargin.*?(?=&|\?|$)//g; | 
| 476 |  |  |  |  |  |  | }# query params | 
| 477 | 0 | 0 |  |  |  |  | if ( exists $args{'leftMargin'}) { | 
| 478 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{leftMargin}\E/$args{'leftMargin'}/g; | 
| 479 |  |  |  |  |  |  | }else{ | 
| 480 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]leftMargin.*?(?=&|\?|$)//g; | 
| 481 |  |  |  |  |  |  | }# query params | 
| 482 | 0 | 0 |  |  |  |  | if ( exists $args{'rightMargin'}) { | 
| 483 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{rightMargin}\E/$args{'rightMargin'}/g; | 
| 484 |  |  |  |  |  |  | }else{ | 
| 485 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]rightMargin.*?(?=&|\?|$)//g; | 
| 486 |  |  |  |  |  |  | }# query params | 
| 487 | 0 | 0 |  |  |  |  | if ( exists $args{'enableChecksum'}) { | 
| 488 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{enableChecksum}\E/$args{'enableChecksum'}/g; | 
| 489 |  |  |  |  |  |  | }else{ | 
| 490 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]enableChecksum.*?(?=&|\?|$)//g; | 
| 491 |  |  |  |  |  |  | }# query params | 
| 492 | 0 | 0 |  |  |  |  | if ( exists $args{'storage'}) { | 
| 493 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{storage}\E/$args{'storage'}/g; | 
| 494 |  |  |  |  |  |  | }else{ | 
| 495 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]storage.*?(?=&|\?|$)//g; | 
| 496 |  |  |  |  |  |  | }# query params | 
| 497 | 0 | 0 |  |  |  |  | if ( exists $args{'folder'}) { | 
| 498 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{folder}\E/$args{'folder'}/g; | 
| 499 |  |  |  |  |  |  | }else{ | 
| 500 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]folder.*?(?=&|\?|$)//g; | 
| 501 |  |  |  |  |  |  | } | 
| 502 |  |  |  |  |  |  |  | 
| 503 |  |  |  |  |  |  |  | 
| 504 | 0 |  |  |  |  |  | my $_body_data; | 
| 505 |  |  |  |  |  |  | # form params | 
| 506 | 0 | 0 |  |  |  |  | if ( exists $args{'file'} ) { | 
| 507 |  |  |  |  |  |  |  | 
| 508 | 0 |  |  |  |  |  | $_body_data = read_file( $args{'file'} , binmode => ':raw' ); | 
| 509 |  |  |  |  |  |  |  | 
| 510 |  |  |  |  |  |  |  | 
| 511 |  |  |  |  |  |  | } | 
| 512 |  |  |  |  |  |  |  | 
| 513 |  |  |  |  |  |  |  | 
| 514 |  |  |  |  |  |  |  | 
| 515 |  |  |  |  |  |  | # authentication setting, if any | 
| 516 | 0 |  |  |  |  |  | my $auth_settings = []; | 
| 517 |  |  |  |  |  |  |  | 
| 518 |  |  |  |  |  |  | # make the API Call | 
| 519 | 0 |  |  |  |  |  | my $response = $self->{api_client}->call_api($_resource_path, $_method, | 
| 520 |  |  |  |  |  |  | $query_params, $form_params, | 
| 521 |  |  |  |  |  |  | $header_params, $_body_data, $auth_settings); | 
| 522 | 0 | 0 |  |  |  |  | if (!$response) { | 
| 523 | 0 |  |  |  |  |  | return; | 
| 524 |  |  |  |  |  |  | } | 
| 525 |  |  |  |  |  |  |  | 
| 526 | 0 | 0 |  |  |  |  | if($AsposeBarCodeCloud::Configuration::debug){ | 
| 527 | 0 |  |  |  |  |  | print "\nResponse Content: ".$response->content; | 
| 528 |  |  |  |  |  |  | } | 
| 529 |  |  |  |  |  |  |  | 
| 530 | 0 |  |  |  |  |  | my $_response_object = $self->{api_client}->pre_deserialize($response->content, 'SaaSposeResponse', $response->header('content-type')); | 
| 531 | 0 |  |  |  |  |  | return $_response_object; | 
| 532 |  |  |  |  |  |  |  | 
| 533 |  |  |  |  |  |  | } | 
| 534 |  |  |  |  |  |  | # | 
| 535 |  |  |  |  |  |  | # PutGenerateMultiple | 
| 536 |  |  |  |  |  |  | # | 
| 537 |  |  |  |  |  |  | # Generate image with multiple barcodes and put new file on server | 
| 538 |  |  |  |  |  |  | # | 
| 539 |  |  |  |  |  |  | # @param String $name New filename (required) | 
| 540 |  |  |  |  |  |  | # @param String $format Format of file (optional) | 
| 541 |  |  |  |  |  |  | # @param String $folder Folder to place file to (optional) | 
| 542 |  |  |  |  |  |  | # @param File $file  (required) | 
| 543 |  |  |  |  |  |  | # @return SaaSposeResponse | 
| 544 |  |  |  |  |  |  | # | 
| 545 |  |  |  |  |  |  | sub PutGenerateMultiple { | 
| 546 | 0 |  |  | 0 | 0 |  | my ($self, %args) = @_; | 
| 547 |  |  |  |  |  |  |  | 
| 548 |  |  |  |  |  |  |  | 
| 549 |  |  |  |  |  |  | # verify the required parameter 'name' is set | 
| 550 | 0 | 0 |  |  |  |  | unless (exists $args{'name'}) { | 
| 551 | 0 |  |  |  |  |  | croak("Missing the required parameter 'name' when calling PutGenerateMultiple"); | 
| 552 |  |  |  |  |  |  | } | 
| 553 |  |  |  |  |  |  |  | 
| 554 |  |  |  |  |  |  | # verify the required parameter 'file' is set | 
| 555 | 0 | 0 |  |  |  |  | unless (exists $args{'file'}) { | 
| 556 | 0 |  |  |  |  |  | croak("Missing the required parameter 'file' when calling PutGenerateMultiple"); | 
| 557 |  |  |  |  |  |  | } | 
| 558 |  |  |  |  |  |  |  | 
| 559 |  |  |  |  |  |  |  | 
| 560 |  |  |  |  |  |  | # parse inputs | 
| 561 | 0 |  |  |  |  |  | my $_resource_path = '/barcode/{name}/generateMultiple/?appSid={appSid}&toFormat={toFormat}&folder={folder}'; | 
| 562 |  |  |  |  |  |  |  | 
| 563 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q&\E/&/g; | 
| 564 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q\/?\E/?/g; | 
| 565 | 0 |  |  |  |  |  | $_resource_path =~ s/\QtoFormat={toFormat}\E/format={format}/g; | 
| 566 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{path}\E/{Path}/g; | 
| 567 |  |  |  |  |  |  |  | 
| 568 | 0 |  |  |  |  |  | my $_method = 'PUT'; | 
| 569 | 0 |  |  |  |  |  | my $query_params = {}; | 
| 570 | 0 |  |  |  |  |  | my $header_params = {}; | 
| 571 | 0 |  |  |  |  |  | my $form_params = {}; | 
| 572 |  |  |  |  |  |  |  | 
| 573 |  |  |  |  |  |  | # 'Accept' and 'Content-Type' header | 
| 574 | 0 |  |  |  |  |  | my $_header_accept = $self->{api_client}->select_header_accept('application/xml', 'application/json'); | 
| 575 | 0 | 0 |  |  |  |  | if ($_header_accept) { | 
| 576 | 0 |  |  |  |  |  | $header_params->{'Accept'} = $_header_accept; | 
| 577 |  |  |  |  |  |  | } | 
| 578 | 0 |  |  |  |  |  | $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); | 
| 579 |  |  |  |  |  |  |  | 
| 580 |  |  |  |  |  |  | # query params | 
| 581 | 0 | 0 |  |  |  |  | if ( exists $args{'name'}) { | 
| 582 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{name}\E/$args{'name'}/g; | 
| 583 |  |  |  |  |  |  | }else{ | 
| 584 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]name.*?(?=&|\?|$)//g; | 
| 585 |  |  |  |  |  |  | }# query params | 
| 586 | 0 | 0 |  |  |  |  | if ( exists $args{'format'}) { | 
| 587 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{format}\E/$args{'format'}/g; | 
| 588 |  |  |  |  |  |  | }else{ | 
| 589 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]format.*?(?=&|\?|$)//g; | 
| 590 |  |  |  |  |  |  | }# query params | 
| 591 | 0 | 0 |  |  |  |  | if ( exists $args{'folder'}) { | 
| 592 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{folder}\E/$args{'folder'}/g; | 
| 593 |  |  |  |  |  |  | }else{ | 
| 594 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]folder.*?(?=&|\?|$)//g; | 
| 595 |  |  |  |  |  |  | } | 
| 596 |  |  |  |  |  |  |  | 
| 597 |  |  |  |  |  |  |  | 
| 598 | 0 |  |  |  |  |  | my $_body_data; | 
| 599 |  |  |  |  |  |  | # form params | 
| 600 | 0 | 0 |  |  |  |  | if ( exists $args{'file'} ) { | 
| 601 |  |  |  |  |  |  |  | 
| 602 | 0 |  |  |  |  |  | $_body_data = read_file( $args{'file'} , binmode => ':raw' ); | 
| 603 |  |  |  |  |  |  |  | 
| 604 |  |  |  |  |  |  |  | 
| 605 |  |  |  |  |  |  | } | 
| 606 |  |  |  |  |  |  |  | 
| 607 |  |  |  |  |  |  |  | 
| 608 |  |  |  |  |  |  |  | 
| 609 |  |  |  |  |  |  | # authentication setting, if any | 
| 610 | 0 |  |  |  |  |  | my $auth_settings = []; | 
| 611 |  |  |  |  |  |  |  | 
| 612 |  |  |  |  |  |  | # make the API Call | 
| 613 | 0 |  |  |  |  |  | my $response = $self->{api_client}->call_api($_resource_path, $_method, | 
| 614 |  |  |  |  |  |  | $query_params, $form_params, | 
| 615 |  |  |  |  |  |  | $header_params, $_body_data, $auth_settings); | 
| 616 | 0 | 0 |  |  |  |  | if (!$response) { | 
| 617 | 0 |  |  |  |  |  | return; | 
| 618 |  |  |  |  |  |  | } | 
| 619 |  |  |  |  |  |  |  | 
| 620 | 0 | 0 |  |  |  |  | if($AsposeBarCodeCloud::Configuration::debug){ | 
| 621 | 0 |  |  |  |  |  | print "\nResponse Content: ".$response->content; | 
| 622 |  |  |  |  |  |  | } | 
| 623 |  |  |  |  |  |  |  | 
| 624 | 0 |  |  |  |  |  | my $_response_object = $self->{api_client}->pre_deserialize($response->content, 'SaaSposeResponse', $response->header('content-type')); | 
| 625 | 0 |  |  |  |  |  | return $_response_object; | 
| 626 |  |  |  |  |  |  |  | 
| 627 |  |  |  |  |  |  | } | 
| 628 |  |  |  |  |  |  | # | 
| 629 |  |  |  |  |  |  | # GetBarcodeRecognize | 
| 630 |  |  |  |  |  |  | # | 
| 631 |  |  |  |  |  |  | # Recognize barcode from a file on server. | 
| 632 |  |  |  |  |  |  | # | 
| 633 |  |  |  |  |  |  | # @param String $name The image name. (required) | 
| 634 |  |  |  |  |  |  | # @param String $type The barcode type. (optional) | 
| 635 |  |  |  |  |  |  | # @param String $checksumValidation Checksum validation parameter. (optional) | 
| 636 |  |  |  |  |  |  | # @param Boolean $stripFnc Allows to strip FNC symbol in recognition results. (optional) | 
| 637 |  |  |  |  |  |  | # @param String $rotationAngle Allows to correct angle of barcode. (optional) | 
| 638 |  |  |  |  |  |  | # @param String $barcodesCount Count of barcodes to recognize. (optional) | 
| 639 |  |  |  |  |  |  | # @param String $rectX Top left point X coordinate of  to recognize barcode inside. (optional) | 
| 640 |  |  |  |  |  |  | # @param String $rectY Top left point Y coordinate of  to recognize barcode inside. (optional) | 
| 641 |  |  |  |  |  |  | # @param String $rectWidth Width of  to recognize barcode inside. (optional) | 
| 642 |  |  |  |  |  |  | # @param String $rectHeight Height of  to recognize barcode inside. (optional) | 
| 643 |  |  |  |  |  |  | # @param String $storage The image storage. (optional) | 
| 644 |  |  |  |  |  |  | # @param String $folder The image folder. (optional) | 
| 645 |  |  |  |  |  |  | # @return BarcodeResponseList | 
| 646 |  |  |  |  |  |  | # | 
| 647 |  |  |  |  |  |  | sub GetBarcodeRecognize { | 
| 648 | 0 |  |  | 0 | 0 |  | my ($self, %args) = @_; | 
| 649 |  |  |  |  |  |  |  | 
| 650 |  |  |  |  |  |  |  | 
| 651 |  |  |  |  |  |  | # verify the required parameter 'name' is set | 
| 652 | 0 | 0 |  |  |  |  | unless (exists $args{'name'}) { | 
| 653 | 0 |  |  |  |  |  | croak("Missing the required parameter 'name' when calling GetBarcodeRecognize"); | 
| 654 |  |  |  |  |  |  | } | 
| 655 |  |  |  |  |  |  |  | 
| 656 |  |  |  |  |  |  |  | 
| 657 |  |  |  |  |  |  | # parse inputs | 
| 658 | 0 |  |  |  |  |  | my $_resource_path = '/barcode/{name}/recognize/?appSid={appSid}&type={type}&checksumValidation={checksumValidation}&stripFnc={stripFnc}&rotationAngle={rotationAngle}&barcodesCount={barcodesCount}&rectX={rectX}&rectY={rectY}&rectWidth={rectWidth}&rectHeight={rectHeight}&storage={storage}&folder={folder}'; | 
| 659 |  |  |  |  |  |  |  | 
| 660 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q&\E/&/g; | 
| 661 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q\/?\E/?/g; | 
| 662 | 0 |  |  |  |  |  | $_resource_path =~ s/\QtoFormat={toFormat}\E/format={format}/g; | 
| 663 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{path}\E/{Path}/g; | 
| 664 |  |  |  |  |  |  |  | 
| 665 | 0 |  |  |  |  |  | my $_method = 'GET'; | 
| 666 | 0 |  |  |  |  |  | my $query_params = {}; | 
| 667 | 0 |  |  |  |  |  | my $header_params = {}; | 
| 668 | 0 |  |  |  |  |  | my $form_params = {}; | 
| 669 |  |  |  |  |  |  |  | 
| 670 |  |  |  |  |  |  | # 'Accept' and 'Content-Type' header | 
| 671 | 0 |  |  |  |  |  | my $_header_accept = $self->{api_client}->select_header_accept('application/xml', 'application/json'); | 
| 672 | 0 | 0 |  |  |  |  | if ($_header_accept) { | 
| 673 | 0 |  |  |  |  |  | $header_params->{'Accept'} = $_header_accept; | 
| 674 |  |  |  |  |  |  | } | 
| 675 | 0 |  |  |  |  |  | $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); | 
| 676 |  |  |  |  |  |  |  | 
| 677 |  |  |  |  |  |  | # query params | 
| 678 | 0 | 0 |  |  |  |  | if ( exists $args{'name'}) { | 
| 679 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{name}\E/$args{'name'}/g; | 
| 680 |  |  |  |  |  |  | }else{ | 
| 681 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]name.*?(?=&|\?|$)//g; | 
| 682 |  |  |  |  |  |  | }# query params | 
| 683 | 0 | 0 |  |  |  |  | if ( exists $args{'type'}) { | 
| 684 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{type}\E/$args{'type'}/g; | 
| 685 |  |  |  |  |  |  | }else{ | 
| 686 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]type.*?(?=&|\?|$)//g; | 
| 687 |  |  |  |  |  |  | }# query params | 
| 688 | 0 | 0 |  |  |  |  | if ( exists $args{'checksumValidation'}) { | 
| 689 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{checksumValidation}\E/$args{'checksumValidation'}/g; | 
| 690 |  |  |  |  |  |  | }else{ | 
| 691 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]checksumValidation.*?(?=&|\?|$)//g; | 
| 692 |  |  |  |  |  |  | }# query params | 
| 693 | 0 | 0 |  |  |  |  | if ( exists $args{'stripFnc'}) { | 
| 694 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{stripFnc}\E/$args{'stripFnc'}/g; | 
| 695 |  |  |  |  |  |  | }else{ | 
| 696 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]stripFnc.*?(?=&|\?|$)//g; | 
| 697 |  |  |  |  |  |  | }# query params | 
| 698 | 0 | 0 |  |  |  |  | if ( exists $args{'rotationAngle'}) { | 
| 699 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{rotationAngle}\E/$args{'rotationAngle'}/g; | 
| 700 |  |  |  |  |  |  | }else{ | 
| 701 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]rotationAngle.*?(?=&|\?|$)//g; | 
| 702 |  |  |  |  |  |  | }# query params | 
| 703 | 0 | 0 |  |  |  |  | if ( exists $args{'barcodesCount'}) { | 
| 704 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{barcodesCount}\E/$args{'barcodesCount'}/g; | 
| 705 |  |  |  |  |  |  | }else{ | 
| 706 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]barcodesCount.*?(?=&|\?|$)//g; | 
| 707 |  |  |  |  |  |  | }# query params | 
| 708 | 0 | 0 |  |  |  |  | if ( exists $args{'rectX'}) { | 
| 709 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{rectX}\E/$args{'rectX'}/g; | 
| 710 |  |  |  |  |  |  | }else{ | 
| 711 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]rectX.*?(?=&|\?|$)//g; | 
| 712 |  |  |  |  |  |  | }# query params | 
| 713 | 0 | 0 |  |  |  |  | if ( exists $args{'rectY'}) { | 
| 714 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{rectY}\E/$args{'rectY'}/g; | 
| 715 |  |  |  |  |  |  | }else{ | 
| 716 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]rectY.*?(?=&|\?|$)//g; | 
| 717 |  |  |  |  |  |  | }# query params | 
| 718 | 0 | 0 |  |  |  |  | if ( exists $args{'rectWidth'}) { | 
| 719 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{rectWidth}\E/$args{'rectWidth'}/g; | 
| 720 |  |  |  |  |  |  | }else{ | 
| 721 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]rectWidth.*?(?=&|\?|$)//g; | 
| 722 |  |  |  |  |  |  | }# query params | 
| 723 | 0 | 0 |  |  |  |  | if ( exists $args{'rectHeight'}) { | 
| 724 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{rectHeight}\E/$args{'rectHeight'}/g; | 
| 725 |  |  |  |  |  |  | }else{ | 
| 726 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]rectHeight.*?(?=&|\?|$)//g; | 
| 727 |  |  |  |  |  |  | }# query params | 
| 728 | 0 | 0 |  |  |  |  | if ( exists $args{'storage'}) { | 
| 729 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{storage}\E/$args{'storage'}/g; | 
| 730 |  |  |  |  |  |  | }else{ | 
| 731 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]storage.*?(?=&|\?|$)//g; | 
| 732 |  |  |  |  |  |  | }# query params | 
| 733 | 0 | 0 |  |  |  |  | if ( exists $args{'folder'}) { | 
| 734 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{folder}\E/$args{'folder'}/g; | 
| 735 |  |  |  |  |  |  | }else{ | 
| 736 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]folder.*?(?=&|\?|$)//g; | 
| 737 |  |  |  |  |  |  | } | 
| 738 |  |  |  |  |  |  |  | 
| 739 |  |  |  |  |  |  |  | 
| 740 | 0 |  |  |  |  |  | my $_body_data; | 
| 741 |  |  |  |  |  |  |  | 
| 742 |  |  |  |  |  |  |  | 
| 743 |  |  |  |  |  |  |  | 
| 744 |  |  |  |  |  |  |  | 
| 745 |  |  |  |  |  |  | # authentication setting, if any | 
| 746 | 0 |  |  |  |  |  | my $auth_settings = []; | 
| 747 |  |  |  |  |  |  |  | 
| 748 |  |  |  |  |  |  | # make the API Call | 
| 749 | 0 |  |  |  |  |  | my $response = $self->{api_client}->call_api($_resource_path, $_method, | 
| 750 |  |  |  |  |  |  | $query_params, $form_params, | 
| 751 |  |  |  |  |  |  | $header_params, $_body_data, $auth_settings); | 
| 752 | 0 | 0 |  |  |  |  | if (!$response) { | 
| 753 | 0 |  |  |  |  |  | return; | 
| 754 |  |  |  |  |  |  | } | 
| 755 |  |  |  |  |  |  |  | 
| 756 | 0 | 0 |  |  |  |  | if($AsposeBarCodeCloud::Configuration::debug){ | 
| 757 | 0 |  |  |  |  |  | print "\nResponse Content: ".$response->content; | 
| 758 |  |  |  |  |  |  | } | 
| 759 |  |  |  |  |  |  |  | 
| 760 | 0 |  |  |  |  |  | my $_response_object = $self->{api_client}->pre_deserialize($response->content, 'BarcodeResponseList', $response->header('content-type')); | 
| 761 | 0 |  |  |  |  |  | return $_response_object; | 
| 762 |  |  |  |  |  |  |  | 
| 763 |  |  |  |  |  |  | } | 
| 764 |  |  |  |  |  |  | # | 
| 765 |  |  |  |  |  |  | # PutBarcodeRecognizeFromBody | 
| 766 |  |  |  |  |  |  | # | 
| 767 |  |  |  |  |  |  | # Recognition of a barcode from file on server with parameters in body. | 
| 768 |  |  |  |  |  |  | # | 
| 769 |  |  |  |  |  |  | # @param String $name The image name. (required) | 
| 770 |  |  |  |  |  |  | # @param String $type The barcode type. (optional) | 
| 771 |  |  |  |  |  |  | # @param String $folder The image folder. (optional) | 
| 772 |  |  |  |  |  |  | # @param BarcodeReader $body BarcodeReader object with parameters. (required) | 
| 773 |  |  |  |  |  |  | # @return BarcodeResponseList | 
| 774 |  |  |  |  |  |  | # | 
| 775 |  |  |  |  |  |  | sub PutBarcodeRecognizeFromBody { | 
| 776 | 0 |  |  | 0 | 0 |  | my ($self, %args) = @_; | 
| 777 |  |  |  |  |  |  |  | 
| 778 |  |  |  |  |  |  |  | 
| 779 |  |  |  |  |  |  | # verify the required parameter 'name' is set | 
| 780 | 0 | 0 |  |  |  |  | unless (exists $args{'name'}) { | 
| 781 | 0 |  |  |  |  |  | croak("Missing the required parameter 'name' when calling PutBarcodeRecognizeFromBody"); | 
| 782 |  |  |  |  |  |  | } | 
| 783 |  |  |  |  |  |  |  | 
| 784 |  |  |  |  |  |  | # verify the required parameter 'body' is set | 
| 785 | 0 | 0 |  |  |  |  | unless (exists $args{'body'}) { | 
| 786 | 0 |  |  |  |  |  | croak("Missing the required parameter 'body' when calling PutBarcodeRecognizeFromBody"); | 
| 787 |  |  |  |  |  |  | } | 
| 788 |  |  |  |  |  |  |  | 
| 789 |  |  |  |  |  |  |  | 
| 790 |  |  |  |  |  |  | # parse inputs | 
| 791 | 0 |  |  |  |  |  | my $_resource_path = '/barcode/{name}/recognize/?appSid={appSid}&type={type}&folder={folder}'; | 
| 792 |  |  |  |  |  |  |  | 
| 793 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q&\E/&/g; | 
| 794 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q\/?\E/?/g; | 
| 795 | 0 |  |  |  |  |  | $_resource_path =~ s/\QtoFormat={toFormat}\E/format={format}/g; | 
| 796 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{path}\E/{Path}/g; | 
| 797 |  |  |  |  |  |  |  | 
| 798 | 0 |  |  |  |  |  | my $_method = 'PUT'; | 
| 799 | 0 |  |  |  |  |  | my $query_params = {}; | 
| 800 | 0 |  |  |  |  |  | my $header_params = {}; | 
| 801 | 0 |  |  |  |  |  | my $form_params = {}; | 
| 802 |  |  |  |  |  |  |  | 
| 803 |  |  |  |  |  |  | # 'Accept' and 'Content-Type' header | 
| 804 | 0 |  |  |  |  |  | my $_header_accept = $self->{api_client}->select_header_accept('application/xml', 'application/json'); | 
| 805 | 0 | 0 |  |  |  |  | if ($_header_accept) { | 
| 806 | 0 |  |  |  |  |  | $header_params->{'Accept'} = $_header_accept; | 
| 807 |  |  |  |  |  |  | } | 
| 808 | 0 |  |  |  |  |  | $header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type('application/json'); | 
| 809 |  |  |  |  |  |  |  | 
| 810 |  |  |  |  |  |  | # query params | 
| 811 | 0 | 0 |  |  |  |  | if ( exists $args{'name'}) { | 
| 812 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{name}\E/$args{'name'}/g; | 
| 813 |  |  |  |  |  |  | }else{ | 
| 814 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]name.*?(?=&|\?|$)//g; | 
| 815 |  |  |  |  |  |  | }# query params | 
| 816 | 0 | 0 |  |  |  |  | if ( exists $args{'type'}) { | 
| 817 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{type}\E/$args{'type'}/g; | 
| 818 |  |  |  |  |  |  | }else{ | 
| 819 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]type.*?(?=&|\?|$)//g; | 
| 820 |  |  |  |  |  |  | }# query params | 
| 821 | 0 | 0 |  |  |  |  | if ( exists $args{'folder'}) { | 
| 822 | 0 |  |  |  |  |  | $_resource_path =~ s/\Q{folder}\E/$args{'folder'}/g; | 
| 823 |  |  |  |  |  |  | }else{ | 
| 824 | 0 |  |  |  |  |  | $_resource_path    =~ s/[?&]folder.*?(?=&|\?|$)//g; | 
| 825 |  |  |  |  |  |  | } | 
| 826 |  |  |  |  |  |  |  | 
| 827 |  |  |  |  |  |  |  | 
| 828 | 0 |  |  |  |  |  | my $_body_data; | 
| 829 |  |  |  |  |  |  |  | 
| 830 |  |  |  |  |  |  |  | 
| 831 |  |  |  |  |  |  | # body params | 
| 832 | 0 | 0 |  |  |  |  | if ( exists $args{'body'}) { | 
| 833 | 0 |  |  |  |  |  | $_body_data = $args{'body'}; | 
| 834 |  |  |  |  |  |  | } | 
| 835 |  |  |  |  |  |  |  | 
| 836 |  |  |  |  |  |  | # authentication setting, if any | 
| 837 | 0 |  |  |  |  |  | my $auth_settings = []; | 
| 838 |  |  |  |  |  |  |  | 
| 839 |  |  |  |  |  |  | # make the API Call | 
| 840 | 0 |  |  |  |  |  | my $response = $self->{api_client}->call_api($_resource_path, $_method, | 
| 841 |  |  |  |  |  |  | $query_params, $form_params, | 
| 842 |  |  |  |  |  |  | $header_params, $_body_data, $auth_settings); | 
| 843 | 0 | 0 |  |  |  |  | if (!$response) { | 
| 844 | 0 |  |  |  |  |  | return; | 
| 845 |  |  |  |  |  |  | } | 
| 846 |  |  |  |  |  |  |  | 
| 847 | 0 | 0 |  |  |  |  | if($AsposeBarCodeCloud::Configuration::debug){ | 
| 848 | 0 |  |  |  |  |  | print "\nResponse Content: ".$response->content; | 
| 849 |  |  |  |  |  |  | } | 
| 850 |  |  |  |  |  |  |  | 
| 851 | 0 |  |  |  |  |  | my $_response_object = $self->{api_client}->pre_deserialize($response->content, 'BarcodeResponseList', $response->header('content-type')); | 
| 852 | 0 |  |  |  |  |  | return $_response_object; | 
| 853 |  |  |  |  |  |  |  | 
| 854 |  |  |  |  |  |  | } | 
| 855 |  |  |  |  |  |  |  | 
| 856 |  |  |  |  |  |  |  | 
| 857 |  |  |  |  |  |  | 1; |