【求助】perl中如何统计中、英文单词个数

这个问题早就有人问过，原来的字符串是：
asldkfj中华sdkfj人民sdl;fkjs共和dl;fj国sl;djf asldkfj中华sdkfj人民sdl;fkjs共