lilalo
diff taillast.pl @ 73:35e0d61c820d
Добавлены ссылки на файлы.
Если в ходе работы в консоли показать файл с помощью команды cat,
он будет показан в конце журнала в секции "Файлы"
(дальше, возможно, для этого будет нужно ставить дополнительную пометку #)
Теперь можно щёлкнуть на ссылку рядом с файлом
и увидеть, откуда он взялся в журнале.
Если в ходе работы в консоли показать файл с помощью команды cat,
он будет показан в конце журнала в секции "Файлы"
(дальше, возможно, для этого будет нужно ставить дополнительную пометку #)
Теперь можно щёлкнуть на ссылку рядом с файлом
и увидеть, откуда он взялся в журнале.
author | devi |
---|---|
date | Tue Feb 07 12:51:03 2006 +0200 (2006-02-07) |
parents | |
children |
line diff
1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/taillast.pl Tue Feb 07 12:51:03 2006 +0200 1.3 @@ -0,0 +1,8 @@ 1.4 +#!/usr/bin/perl 1.5 + 1.6 +for $d (@ARGV) { 1.7 + push @d, glob("$d/*"); 1.8 +} 1.9 +@{f} = sort { (stat(${a}))[9] <=> (stat(${b}))[9] } (@d); 1.10 +print "tail -f ${f[$#f]}\n"; 1.11 +__END__