view release on metacpan or  search on metacpan

lib/WebService/CloudPT.pm  view on Meta::CPAN

L<https://cloudpt.pt/documentation#search>

=head2 shares(path, [params])

    my $data = $cloudpt->shares('some_file') or die $cloudpt->error;

L<https://cloudpt.pt/documentation#shares>

=head2 media(path, [params])

    my $data = $cloudpt->media('some_file') or die $cloudpt->error;

L<https://cloudpt.pt/documentation#media>

=head2 copy_ref(path)

    my $copy_ref = $cloudpt->copy_ref('folder/test.txt') or die $cloudpt->error;

    $cloudpt->copy($copy_ref, 'folder/test_copy.txt') or die $cloudpt->error;

L<https://cloudpt.pt/documentation#copyref>

=head2 thumbnails(path, output)

    my $fh_get = File::Temp->new;
    $cloudpt->thumbnails('folder/file.txt', $fh_get) or die $cloudpt->error;
    $fh_get->flush;
    $fh_get->seek(0, 0);

L<https://cloudpt.pt/documentation#thumbnails>

=head2 list($path, {'param1' => 'value1', 'param2' => 'value2'....})

	my $data = $cloudpt->list('/test', {'file_limit' => 10});

L<https://cloudpt.pt/documentation#list>

=head2 list_links

	my $data = $cloudpt->list_links();
	
L<https://cloudpt.pt/documentation#listlinks>

=head2 share_folder
	
	my $data = $cloudpt->share_folder('/some_folder', 'my_friend@somewhere.at');
	print $data->{'req_id'}

L<https://cloudpt.pt/documentation#sharefolder>


=head2 list_shared_folders

	my $data = $cloudpt->list_shared_folders();
	
L<https://cloudpt.pt/documentation#listsharedfolders>


=head2 env_proxy

enable HTTP_PROXY, NO_PROXY

    $cloudpt->env_proxy;

=head1 AUTHOR

Bruno Martins C<< <bruno-martins at telecom.pt> >>, based on WebService::Dropbox by Shinichiro Aska

=head1 SEE ALSO

- L<https://cloudpt.pt/documentation>

=head1 LICENSE

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

=cut