return (0) unless ( $attr =~ /^$START_CHAR$NAME_CHAR*$/ );

##</code><code>##

return (0) unless ( $attr =~ /^$START_CHAR$NAME_CHAR+$/ );

##</code><code>##

Name    ::=    NameStartChar (NameChar)*