# 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);
}

##</code><code>##

$self->run_modes(
    'static_page'    => 'printStaticPage',
    'AUTOLOAD' => 'showErrorPage'
);

##</code><code>##

# page
if($post{'page'} eq "about"){
  # print page about
} elsif($post{'page'} eq "purchase"){
  # print page purchase
} elsif($post{'page'} eq "contact"){
  # print page contact
} else {
  # print deault page
}