sub is_valid_name { $_[0] =~ m{[a-zA-Z0-9_ ]} }

##</code><code>##

sub is_valid_name { $_[0] !~ m{[^a-zA-Z0-9_ ]} }