$string =~ /^(?:([smtwhfa])(?!.*\1))+$/