【perl】转换（tr或y）统计单词字符,该怎么解决

【perl】转换（tr或y）统计单词字符
我想计算一个单词的字符，觉得转换是个简单的方法，可是单词中的连字符该怎么写进去

Perl code

$A=~tr/[-a-zA-Z]//;

例如上面这句，第一个连字符会报错

------解决方案--------------------
把方括号去掉。或者把-放到方括号外面。