view release on metacpan or  search on metacpan

lib/CloudApp/REST.pm  view on Meta::CPAN

=cut

sub authenticate {
    my $self   = shift;
    my $params = shift;

    my $email = $params->{email} || $params->{username} || $params->{user} || $self->email || die "You have to provide an email address";
    my $pass  = $params->{password} || $params->{pass} || $self->password || die "You have to provide a password";

    $self->useragent->credentials($self->auth_netloc, $self->auth_realm, $email, $pass);

    return 1;
}

=head2 account_register

Parameters:

=over

lib/CloudApp/REST/Item.pm  view on Meta::CPAN

    $self->_REST->_delete_item($self);
}

=head2 strip

Removes the reference to L<CloudApp::REST>.

As long as an item is not stripped,
every item instance contains a reference to the API instance, which may also
contain the credentials of the user in cleartext!  Strip an item before you pass
it along to someone else to prevent unwanted or unauthorized reading of the users data!

=cut

sub strip {
    my $self = shift;

    $self->_remove_REST;
    return 1;
}