File Coverage

blib/lib/AsposeBarCodeCloud/BarcodeApi.pm
Criterion Covered Total %
statement 30 386 7.7
branch 0 178 0.0
condition n/a
subroutine 10 18 55.5
pod 0 8 0.0
total 40 590 6.7


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;