tail -1

Glue

如何最有效的得到文件的最后一行。
最好是用perl

LYOO

1. #!/usr/bin/perl -w
   
2. chomp(@alllines = <STDIN>);
   
3. $lastline = pop @filelines;
   
4. print $lastline;

复制代码

该方法只适用于处理较小的文本文件，如果你有一个500MB的日志文件，执行该脚本可能会耗尽系统的内存。:p

Glue

不是我想要的

KornLee

最初由 gurulite 发表
不是我想要的

很遗憾,咱们这里懂perl...:sorry,我建议你到下面的地方你可以去看看,希望有所收获!;)
http://www.chinaunix.net/forum/viewforum.php?&f=25

Glue

我是想万一运气好 ;)
这应该是个高级应用了。

KornLee

最初由 gurulite 发表
我是想万一运气好 ;)
这应该是个高级应用了。

:ask:ask

2. cat lastlien.pl
3. #!/usr/bin/perl
4. print "input file:";
5. while (<>) {
6. @line=`cat $_`;
7. print pop@line;
8. exit;
9. }

复制代码

Glue

这个我找到过，还是要读出所有行
版主热心，佩服佩服  ;)

idkey

sed -n '$p' file