Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re^3: Perl Catalyst

by akuk (Sexton)
on Oct 10, 2018 at 19:15 UTC ( #1223823=note: print w/replies, xml ) Need Help??


in reply to Re^2: Perl Catalyst
in thread Perl Catalyst

Finally, I figured it out, how to authenticate using Crypt::PBKDF2

Just in case anyone else stuck in this loop. Here is the way

# In App.pm 'Plugin::Authentication' => { default_realm => 'members', members => { credential => { class => 'Password', password_field => 'password', password_type => 'self_check' }, store => { class => 'DBIx::Class', user_model => 'DB::User', } } },

And now the DB::User file

__PACKAGE__->load_components("InflateColumn::DateTime", "TimeStam +p", "EncodedColumn"); # Pay special attention to EncodedColumn, I was using passphrase colum +n there. That my silly mistake and it cost me hours # and now add_columns __PACKAGE__->add_columns( 'password' => { data_type => 'text', encode_column => 1, encode_class => 'Crypt::PBKDF2', encode_args => { hash_class => 'HMACSHA2', hash_args => { sha_size => 512, }, iterations => 10000, salt_len => 10, }, encode_check_method => 'check_password', } );

And this works for me. Thanks for the assistance "@Your Mother"

Replies are listed 'Best First'.
Re^4: Perl Catalyst
by Your Mother (Bishop) on Oct 10, 2018 at 20:27 UTC

    Thank you for digging the answer out. I was going to try later tonight so you saved me, and future seekers, the trouble. :P

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1223823]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (4)
As of 2019-12-10 02:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?