perl统计文本中字符个数

#!/usr/bin/perl -w open (HFile,"/usr/develop-program/conf.txt") || die "Open error $!";   # 打开固定路径文本,文本中字符以标点符号，空格隔开 @file=<HFile>;    #将文本中文件读入到数组中 chomp @file;       ＃去掉回车 close (HFile);    ＃关闭文件 fo

>>阅读原文<<