Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- use Storable;
- ...
- sub auto {
- ...
- unless (...) { #ie don't do this if processing the login action
- my $formitems = freeze $c->request->body_parameters;
- my $freezer = $rs->update_or_create(
- {user => $c->user, formitems => $formitems} );
- # Don't quote me on the exact syntax, I don't use DBIx::Class
- }
- ...
- my $formitems = $c->request->body_parameters
- || thaw $rs->find({$user => $c->user})->formitems
- || {} ;
- # use formitems instead of $c->request->body_parameters from here on in
Add Comment
Please, Sign In to add comment