if ( $name = ~/[a-z]/)

##</code><code>##

if ( $name =~ /[a-z]/)