File Coverage

blib/lib/Paws/ImportExport.pm
Criterion Covered Total %
statement 10 46 21.7
branch 0 4 0.0
condition n/a
subroutine 4 13 30.7
pod 7 11 63.6
total 21 74 28.3


line stmt bran cond sub pod time code
1             package Paws::ImportExport;
2 1     1   10664 use Moose;
  1     2   3  
  1         30  
  2         1557  
  2         5  
  2         14  
3 9     9 0 36 sub service { 'importexport' }
4 0     0 0 0 sub version { '2010-06-01' }
5 0     0 0 0 sub flattened_arrays { 0 }
6             has max_attempts => (is => 'ro', isa => 'Int', default => 5);
7             has retry => (is => 'ro', isa => 'HashRef', default => sub {
8             { base => 'rand', type => 'exponential', growth_factor => 2 }
9             });
10             has retriables => (is => 'ro', isa => 'ArrayRef', default => sub { [
11             ] });
12              
13             with 'Paws::API::Caller', 'Paws::API::EndpointResolver', 'Paws::Net::V2Signature', 'Paws::Net::QueryCaller', 'Paws::Net::XMLResponse';
14              
15             has '+region_rules' => (default => sub {
16             my $regioninfo;
17             $regioninfo = [
18             {
19             constraints => [
20             [
21             'region',
22             'notStartsWith',
23             'cn-'
24             ]
25             ],
26             uri => 'https://importexport.amazonaws.com'
27             }
28             ];
29              
30             return $regioninfo;
31             });
32              
33            
34             sub CancelJob {
35 0     0 1 0 my $self = shift;
36 0         0 my $call_object = $self->new_with_coercions('Paws::ImportExport::CancelJob', @_);
37 0         0 return $self->caller->do_call($self, $call_object);
38             }
39             sub CreateJob {
40 0     0 1 0 my $self = shift;
41 0         0 my $call_object = $self->new_with_coercions('Paws::ImportExport::CreateJob', @_);
42 0         0 return $self->caller->do_call($self, $call_object);
43             }
44             sub GetShippingLabel {
45 0     0 1 0 my $self = shift;
46 0         0 my $call_object = $self->new_with_coercions('Paws::ImportExport::GetShippingLabel', @_);
47 0         0 return $self->caller->do_call($self, $call_object);
48             }
49             sub GetStatus {
50 0     0 1 0 my $self = shift;
51 0         0 my $call_object = $self->new_with_coercions('Paws::ImportExport::GetStatus', @_);
52 0         0 return $self->caller->do_call($self, $call_object);
53             }
54             sub ListJobs {
55 1     1 1 283 my $self = shift;
56 1         6 my $call_object = $self->new_with_coercions('Paws::ImportExport::ListJobs', @_);
57 1         505 return $self->caller->do_call($self, $call_object);
58             }
59             sub UpdateJob {
60 0     0 1   my $self = shift;
61 0           my $call_object = $self->new_with_coercions('Paws::ImportExport::UpdateJob', @_);
62 0           return $self->caller->do_call($self, $call_object);
63             }
64            
65             sub ListAllJobs {
66 0     0 1   my $self = shift;
67              
68 0 0         my $callback = shift @_ if (ref($_[0]) eq 'CODE');
69 0           my $result = $self->ListJobs(@_);
70 0           my $next_result = $result;
71              
72 0 0         if (not defined $callback) {
73 0           while ($next_result->IsTruncated) {
74 0           $next_result = $self->ListJobs(@_, Marker => $next_result->Jobs->[-1]->JobId);
75 0           push @{ $result->Jobs }, @{ $next_result->Jobs };
  0            
  0            
76             }
77 0           return $result;
78             } else {
79 0           while ($result->IsTruncated) {
80 0           $callback->($_ => 'Jobs') foreach (@{ $result->Jobs });
  0            
81 0           $result = $self->ListJobs(@_, Marker => $result->Jobs->[-1]->JobId);
82             }
83 0           $callback->($_ => 'Jobs') foreach (@{ $result->Jobs });
  0            
84             }
85              
86             return undef
87 0           }
88              
89              
90 0     0 0   sub operations { qw/CancelJob CreateJob GetShippingLabel GetStatus ListJobs UpdateJob / }
91              
92             1;
93              
94             ### main pod documentation begin ###
95              
96             =head1 NAME
97              
98             Paws::ImportExport - Perl Interface to AWS AWS Import/Export
99              
100             =head1 SYNOPSIS
101              
102             use Paws;
103              
104             my $obj = Paws->service('ImportExport');
105             my $res = $obj->Method(
106             Arg1 => $val1,
107             Arg2 => [ 'V1', 'V2' ],
108             # if Arg3 is an object, the HashRef will be used as arguments to the constructor
109             # of the arguments type
110             Arg3 => { Att1 => 'Val1' },
111             # if Arg4 is an array of objects, the HashRefs will be passed as arguments to
112             # the constructor of the arguments type
113             Arg4 => [ { Att1 => 'Val1' }, { Att1 => 'Val2' } ],
114             );
115              
116             =head1 DESCRIPTION
117              
118             AWS Import/Export Service AWS Import/Export accelerates transferring
119             large amounts of data between the AWS cloud and portable storage
120             devices that you mail to us. AWS Import/Export transfers data directly
121             onto and off of your storage devices using Amazon's high-speed internal
122             network and bypassing the Internet. For large data sets, AWS
123             Import/Export is often faster than Internet transfer and more cost
124             effective than upgrading your connectivity.
125              
126             =head1 METHODS
127              
128             =head2 CancelJob(JobId => Str, [APIVersion => Str])
129              
130             Each argument is described in detail in: L<Paws::ImportExport::CancelJob>
131              
132             Returns: a L<Paws::ImportExport::CancelJobOutput> instance
133              
134             This operation cancels a specified job. Only the job owner can cancel
135             it. The operation fails if the job has already started or is complete.
136              
137              
138             =head2 CreateJob(JobType => Str, Manifest => Str, ValidateOnly => Bool, [APIVersion => Str, ManifestAddendum => Str])
139              
140             Each argument is described in detail in: L<Paws::ImportExport::CreateJob>
141              
142             Returns: a L<Paws::ImportExport::CreateJobOutput> instance
143              
144             This operation initiates the process of scheduling an upload or
145             download of your data. You include in the request a manifest that
146             describes the data transfer specifics. The response to the request
147             includes a job ID, which you can use in other operations, a signature
148             that you use to identify your storage device, and the address where you
149             should ship your storage device.
150              
151              
152             =head2 GetShippingLabel(JobIds => ArrayRef[Str|Undef], [APIVersion => Str, City => Str, Company => Str, Country => Str, Name => Str, PhoneNumber => Str, PostalCode => Str, StateOrProvince => Str, Street1 => Str, Street2 => Str, Street3 => Str])
153              
154             Each argument is described in detail in: L<Paws::ImportExport::GetShippingLabel>
155              
156             Returns: a L<Paws::ImportExport::GetShippingLabelOutput> instance
157              
158             This operation generates a pre-paid UPS shipping label that you will
159             use to ship your device to AWS for processing.
160              
161              
162             =head2 GetStatus(JobId => Str, [APIVersion => Str])
163              
164             Each argument is described in detail in: L<Paws::ImportExport::GetStatus>
165              
166             Returns: a L<Paws::ImportExport::GetStatusOutput> instance
167              
168             This operation returns information about a job, including where the job
169             is in the processing pipeline, the status of the results, and the
170             signature value associated with the job. You can only return
171             information about jobs you own.
172              
173              
174             =head2 ListJobs([APIVersion => Str, Marker => Str, MaxJobs => Int])
175              
176             Each argument is described in detail in: L<Paws::ImportExport::ListJobs>
177              
178             Returns: a L<Paws::ImportExport::ListJobsOutput> instance
179              
180             This operation returns the jobs associated with the requester. AWS
181             Import/Export lists the jobs in reverse chronological order based on
182             the date of creation. For example if Job Test1 was created 2009Dec30
183             and Test2 was created 2010Feb05, the ListJobs operation would return
184             Test2 followed by Test1.
185              
186              
187             =head2 UpdateJob(JobId => Str, JobType => Str, Manifest => Str, ValidateOnly => Bool, [APIVersion => Str])
188              
189             Each argument is described in detail in: L<Paws::ImportExport::UpdateJob>
190              
191             Returns: a L<Paws::ImportExport::UpdateJobOutput> instance
192              
193             You use this operation to change the parameters specified in the
194             original manifest file by supplying a new manifest file. The manifest
195             file attached to this request replaces the original manifest file. You
196             can only use the operation after a CreateJob request but before the
197             data transfer starts and you can only use it on jobs you own.
198              
199              
200              
201              
202             =head1 PAGINATORS
203              
204             Paginator methods are helpers that repetively call methods that return partial results
205              
206             =head2 ListAllJobs(sub { },[APIVersion => Str, Marker => Str, MaxJobs => Int])
207              
208             =head2 ListAllJobs([APIVersion => Str, Marker => Str, MaxJobs => Int])
209              
210              
211             If passed a sub as first parameter, it will call the sub for each element found in :
212              
213             - Jobs, passing the object as the first parameter, and the string 'Jobs' as the second parameter
214              
215             If not, it will return a a L<Paws::ImportExport::ListJobsOutput> instance with all the C<param>s; from all the responses. Please take into account that this mode can potentially consume vasts ammounts of memory.
216              
217              
218              
219              
220              
221             =head1 SEE ALSO
222              
223             This service class forms part of L<Paws>
224              
225             =head1 BUGS and CONTRIBUTIONS
226              
227             The source code is located here: https://github.com/pplu/aws-sdk-perl
228              
229             Please report bugs to: https://github.com/pplu/aws-sdk-perl/issues
230              
231             =cut
232