On Thu, Sep 13, 2007 at 10:27:04AM +0100, Ian Docherty wrote:

My existing Catalyst application is being extended. I want to keep a
record of previous passwords used by a user to prevent them being re-used.

I have Model 'UsedPassword' to keep track of the previous 8 (say)
passwords as so-

package MyApp::Schema::UsedPassword;
use strict;
use base qw(DBIx::Class);

__PACKAGE__->load_components(qw(PK::Auto Core));
__PACKAGE__->add_columns(qw(id user password));

So, if I want a method (create_limited) to create a new UsedPassword
object, that ensures no more that 8 (say) passwords are stored in the
database (against each User) where should it go?

Ideally (I think) I would like to do something like

user => $user->id,
password => $password,

but i can't see how to add it to MyApp::Schema::UsedPassword (since
$c->model('DBIC::UsedPassword') returns a ResultSet not a

Any other suggestions where to put it (polite one's only please)?
^^ BLAM!

Why not just have it as


and then hook that into $user->insert + ->update ?

Perhaps better still, why not just make this a trigger? (unless you're using
MySQL, in which case s/make this a trigger/use a database/ :)

Matt S Trout Need help with your Catalyst or DBIx::Class project?
Technical Director Want a managed development or deployment platform?
Shadowcat Systems Ltd. Contact mst (at) shadowcatsystems.co.uk for a quote
http://chainsawblues.vox.com/ http://www.shadowcat.co.uk/

Search Discussions

Discussion Posts


Follow ups

Related Discussions

Discussion Navigation
viewthread | post
posts ‹ prev | 9 of 17 | next ›
Discussion Overview
groupcatalyst @
categoriescatalyst, perl
postedSep 13, '07 at 10:27a
activeSep 14, '07 at 1:35p



site design / logo © 2022 Grokbase