my $action = param('action');
if (defined $action) {$action =~ s/[^a-zA-Z0-9_-]//g;}
if (!defined $action) {$action = 'home';}