view release on metacpan or  search on metacpan

lib/Authen/PluggableCaptcha/KeyManagerDB/RoseDB/Object.pm  view on Meta::CPAN

5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
package Authen::PluggableCaptcha::KeyManagerDB::RoseDB::Object;
use Authen::PluggableCaptcha::KeyManagerDB::RoseDB ();
use Rose::DB::Object ();
use base qw(https://metacpan.org/pod/Rose::DB::Object">Rose::DB::Object);
 
sub init_db { Authen::PluggableCaptcha::KeyManagerDB::RoseDB->new };
 
sub found {
        my      ( $self )= @_;
        return $self->not_found ? 0 : 1 ;
}
 
1;