view release on metacpan or  search on metacpan

lib/Net/UpYun.pm  view on Meta::CPAN

=head2 get($path)
    
    say $upyun->get('/demo/1.txt');

Get the file content.

=head2 delete($path)

    my $ok = $upyun->delete('/demo/1.txt');

Delete the file. 


=head2 reponse

    my $http_response = $upyun->response;

Returns latest response,it's an instance of HTTP::Response.

=head2 res_content

Raw response content body.

=head2 is_success

=head2 is_error

These methods indicate if the response was informational, successful, or an error.
If the response code was 2xx code, is_success is true, else is_error is true.

=head2 error_code

The code is a 3 digit number that encode the overall outcome of the last HTTP response.

=head2 error_message

The message is a short human readable single line string that explains the last response code.

=head2 do_request

Internal, send signed request to server.

=head2 sign

Private.

=head1 TODOS

Much jobs to do.

=over

=item * handy client shell.

=item * copy/move file under same bucket or between different bucket.

=item * simple check file exists on remote ,no need  to fetch its content,save bandwidth.

=item * display/compare files checksum(MD5) local and remote.

=item * streaming upload to save memory.

=item * useful utility, like tar/untar to/from upyun on fly.

=item * multi operation and performance requests in parallel.

=item * code clean and refactory.

=back

=head1 AUTHOR

Night Sailer(Pan Fan) <nightsailer{at}gmail_dot_com>

=head1 COPYRIGHT

Copyright (C) Pan Fan(nightsailer)

=head1 LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.