sub edit { my $self = shift; my $user_id = $self->query->param( 'user' ); $self->session->param( user => $user_id ); # store it ... } sub save { my $self = shift; my $user_id = $self->session->param( 'user' ); # retrieve it ... }