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

【perl】转换(tr或y)统计单词字符
我想计算一个单词的字符,觉得转换是个简单的方法,可是单词中的连字符该怎么写进去
Perl code
$A=~tr/[-a-zA-Z]//;

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

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