sub create_digest_from_password {
        my ( $self, $pass ) = @_;
        my $md5 = new Digest::MD5;
        $md5->add( $pass );
        $md5->add( $self->{ _salt } );
        $md5->b64digest;
    }