统计一个文件行数的最简单方法是什么？

daihaoll

UID: 43332
帖子: 25
积分: 57
在线时间: 1 小时

1^# daihaoll 发表于 2005-03-29 14:15

统计一个文件行数的最简单方法是什么？

perl程序中，比如统计fileA的行数，最简单的办法是？

daihaoll

UID: 43332
帖子: 25
积分: 57
在线时间: 1 小时

2^# daihaoll 发表于 2005-03-29 14:16

或者用shell下的命令，最好是一个指令就能统计出来的。

dajun

UID: 1292
帖子: 150
积分: 345
在线时间: 1 天 7 小时

3^# dajun 发表于 2005-03-29 14:21

wc -l

daihaoll

UID: 43332
帖子: 25
积分: 57
在线时间: 1 小时

4^# daihaoll 发表于 2005-03-29 14:53

刚才问题表述不太清楚呵呵，其实是想统计非空行的个数

我现在只能在perl中用
while(<FILEA>
{
/\S/ and $count++;
}
的办法，虽然能实现但是看起来比较麻烦呵呵

flw

UID: 21204
帖子: 144
积分: 331
在线时间: 1 天 4 小时

5^# flw 发表于 2005-03-29 14:58

grep -v "^\s*$" ttt.pl | wc -l

bloves

UID: 16685
帖子: 115
积分: 264
在线时间: 18 小时

6^# bloves 发表于 2005-03-29 15:37

@file = <FILEHANDLE>;;
$count = @file;

c1l2d3

UID: 33265
帖子: 183
积分: 420
在线时间: 1 天 21 小时

7^# c1l2d3 发表于 2005-03-29 15:40

try:AWK

[Copy to clipboard] [ - ]

CODE:

awk '$0!~/^$/{m++}END{print m}' fileA

apile

UID: 42255
帖子: 66
积分: 151
在线时间: 6 小时

8^# apile 发表于 2005-03-29 17:15

$number = grep { !/^\s*$/ } <FF>;;

寂寞烈火

UID: 27011
帖子: 1
积分: 2
在线时间: 10 分钟

9^# 寂寞烈火发表于 2005-03-30 00:43

Try perl1line:

[Copy to clipboard] [ - ]

CODE:

perl -ne 'print $. if eof' filename

awk? try:

[Copy to clipboard] [ - ]

CODE:

awk 'END{print NR}' filename

or:

[Copy to clipboard] [ - ]

CODE:

nl filename|tail -n1

don

UID: 1177
帖子: 108
积分: 248
在线时间: 16 小时

10^# don 发表于 2005-03-31 05:24

Maybe it's off the topic, I just did a performance test on above methods with no blank line filtering. Just as I expected, wc is the fastest.

time perl -ne 'print $. if eof' tt
3466212
real 0m23.510s
user 0m7.120s
sys    0m1.950s

time perl -ne 'print $. if eof' tt
3466212
real 0m21.308s
user 0m6.660s
sys    0m2.000s

time awk 'END{print NR}' tt
3466212

real 0m22.699s
user 0m3.520s
sys    0m2.420s

time awk 'END{print NR}' tt
3466212

real 0m21.341s
user 0m3.810s
sys    0m2.240s

time wc -l tt
3466212 tt

real 0m18.756s
user 0m0.900s
sys    0m2.300s

time wc -l tt
3466212 tt

real 0m17.333s
user 0m1.120s
sys    0m2.150s

time nl tt|tail -n1
3466212 xxxx

real 1m2.507s
user 0m49.000s
sys    0m5.270s