# application object my $self = shift; # get cgi query object my $q = $self->query(); my %post = $q->Vars; # if entries_per_page is not empty: set value, if it's empty and session value is empty: init session value if($post{'entries_per_page'}){ $self->session->param('entries_per_page' => $post{'entries_per_page'}); } elsif( (!$post{'entries_per_page'}) && (!$self->session->param('entries_per_page')) ) { $self->session->param('entries_per_page' => 10); }