Help for this page
if ($name =~ /^[a-z]+$/i) { print "only alphas" }
if ($name !~ /[^a-z]/i) { print "no non-alphas" }