perl統計文本中字符個數

#!/usr/bin/perl -w open (HFile,"/usr/develop-program/conf.txt") || die "Open error $!";   # 打開固定路徑文本,文本中字符以標點符號，空格隔開 @file=<HFile>;    #將文本中文件讀入到數組中 chomp @file;       ＃去掉回車 close (HFile);    ＃關閉文件 fo

>>阅读原文<<