lilalo

annotate taillast.pl @ 100:2c00c61f2d7b

Коммичу изменения, но сам не знаю зачем.
Нужно l3-cgi переписать вообще с нуля.
Он мерзкий.

И продумать нужно, как он вообще должен работать.
Понятно, приблизительно, как он должен показывать журнал,
когда до него уже дошли,
но вот если не дошли, то что делать не понятно.
Короче, продумать систему навигации.
author devi
date Wed Jun 14 21:37:22 2006 +0300 (2006-06-14)
parents
children
rev   line source
devi@0 1 #!/usr/bin/perl
devi@0 2
devi@0 3 for $d (@ARGV) {
devi@0 4 push @d, glob("$d/*");
devi@0 5 }
devi@0 6 @{f} = sort { (stat(${a}))[9] <=> (stat(${b}))[9] } (@d);
devi@0 7 print "tail -f ${f[$#f]}\n";
devi@0 8 __END__