my %Pages = (
	'Login'           => \&validateAccount,
	'Create Account'  => \&createAccount,
	'User Options'    => \&userOptions,
	'View Flashcards' => \&displayCards,
);

if ( !$q->param ) {
	loginPage();
}
elsif ($q->param('action')) {
	my $page = $q->param('action');
	$Pages{$page}->();
}
else  {
	noSuchPage();
}

##</code><code>##

my $action = $query->param('action');
if (exists $Pages{$action}) {
	$Pages{$action}->();
} else {
	noSuchPage();
}