my ($action) = param('action') =~ /^([[:alpha:]]+)$/;