sub top {
	my $app = shift;
	
	# Reset the cookies
	
	$app->cookie->bake(-name=>'site', -value=>$app->query->param('site'), -expires=>'1h');
	$app->cookie->bake(-name=>'keyword_or', -value=>'', -expires=>'-1h');

	$app->param('template', $app->get_template('top.html'));
	
	return ($app->output);
}

sub results {
	my $app = shift;
	
	# Do stuff to the keyword
	&manage_keyword($app) if ($app->query->param('do_search'));
	
	
	
	return ($app->output);
}

sub manage_keyword {
	my $app = shift;

	my $keyword_or  = $app->query->param('keyword_or');
	   $keyword_combined ||= $app->query->cookie('keyword_or');
	   
....
	$app->cookie->bake(-name=>'keyword_or', -value=>"$keyword_or") if $keyword_or;
.....
}