Help for this page

Select Code to Download

Select or download this

my %Pages = (
    'Login'           => \&validateAccount,
    'Create Account'  => \&createAccount,
...
else  {
    noSuchPage();
}

Select or download this

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