# My preferred version. my ($name) = param('name') =~ /^([[:alpha:]]+)$/;