请问这是什么问题

asp_8

UID: 10439
帖子: 54
积分: 124
在线时间: 4 小时

1^# asp_8 发表于 2008-07-31 11:42

请问这是什么问题

[root@web src]# ./cr.pl
Terminated

源头代码:

$file = "/usr/local/apache/logs/access_log"; # 此文件2G
open($fp,$file);
@list = <$fp>;
$rows = @list;
print $rows;

guijia8427

UID: 8237
帖子: 160
积分: 368
在线时间: 1 天 11 小时

2^# guijia8427 发表于 2008-07-31 11:47

不懂LZ什么意思

converse

UID: 43541
帖子: 20
积分: 46
在线时间: 10 分钟

3^# converse 发表于 2008-07-31 12:25

>>@list = <$fp>;

这句代码直接把2G文件的内容读取到数组中了,内存够用吗?

最好这样:
while (<$fp>)
则一行一行的读取.

xiaoyu9805119

UID: 39268
帖子: 67
积分: 154
在线时间: 6 小时

4^# xiaoyu9805119 发表于 2008-07-31 13:13

输出文件行数

hdc1112

UID: 2620
帖子: 83
积分: 190
在线时间: 9 小时

5^# hdc1112 发表于 2008-07-31 13:17

竟然敢用这种写法。。我在learning perl书上说，如果把一个400Mb的文件用数组读的话，实际需要2G的内存空间，你的文件就有2G，所以。。。。这个问题。。。。。

asp_8

UID: 10439
帖子: 54
积分: 124
在线时间: 4 小时

6^# asp_8 发表于 2008-08-01 11:26

惭愧呀,我对PERL知知甚少,只知道她很强大,请各位老大给推荐本书吧.

不死草

UID: 35536
帖子: 142
积分: 326
在线时间: 1 天 3 小时

7^# 不死草发表于 2008-08-02 13:30

就是读出这个文件的行数。

forlorngenius

UID: 32353
帖子: 42
积分: 96
在线时间: 2 小时

8^# forlorngenius 发表于 2008-08-02 14:14

q1208c

UID: 35986
帖子: 6
积分: 13
在线时间: 10 分钟

9^# q1208c 发表于 2008-08-02 14:22

wc -l

这个快些.

或者, 算一下有多少个回车.

lujx

UID: 19039
帖子: 132
积分: 303
在线时间: 1 天

10^# lujx 发表于 2008-08-02 17:28

QUOTE:

原帖由 asp_8 于 2008-8-1 11:26 发表
惭愧呀,我对PERL知知甚少,只知道她很强大,请各位老大给推荐本书吧.

《Learning Perl》！