in reply to uninitialized value $_ in pattern match (m//)

if ( $name = ~/[a-z]/) is not the same as
if ( $name =~ /[a-z]/)