tail -f w perlu

Thread View: pl.comp.lang.perl

5 messages

[T] Back to Threads [V] Tree View [G] Group Articles

5 total messages Started by Maciej Misiak Tue, 25 May 2010 22:27

#51923

Author: Maciej Misiak
Date: Tue, 25 May 2010 22:27

15 lines
1406 bytes

Krótko.
Komendą nieperlową 'tail -f plik_logu.log' oglądam na żywca logi 
generowane przez program.
Logi zawierają kilka śmieci, które niebotycznie wydłużają i zaciemniają 
i chcę je przefiltrować. Oczywiście perlem, bo nie znam chwilowo nic 
lepszego. Jest jakaś opcja może żeby perl też działał na żywca? Próbowałem

perl -pe 's/tu cos//; s/tu cos innego//' plik_logu.log | tail -f

ale oczywiście nie działa to tak, jak bym się spodziewał.
Kwestia zastosowania dodatkowych pakietów z CPANa jest do rozważenia.
Ewentualnie może inne pokrewne toole jak awk?

-- 
grizzley

Re: tail -f w perlu

#51924

Author: Bartosz Feński aka fEnIo
Date: Tue, 25 May 2010 22:31

27 lines
1925 bytes

W artykule Maciej Misiak napisał(a):

> Krótko.
> Komendą nieperlową 'tail -f plik_logu.log' oglądam na żywca logi 
> generowane przez program.
> Logi zawierają kilka śmieci, które niebotycznie wydłużają i zaciemniają 
> i chcę je przefiltrować. Oczywiście perlem, bo nie znam chwilowo nic 
> lepszego. Jest jakaś opcja może żeby perl też działał na żywca? Próbowałem
>
> perl -pe 's/tu cos//; s/tu cos innego//' plik_logu.log | tail -f
>
> ale oczywiście nie działa to tak, jak bym się spodziewał.
> Kwestia zastosowania dodatkowych pakietów z CPANa jest do rozważenia.
> Ewentualnie może inne pokrewne toole jak awk?

A może po prostu `tail -f /var/log/dupa | grep -v spadaj`?

Ewentualnie sobie tego grepa zastąp swoim ukochanym perlem ;)

pozdr,
fEnIo

-- 
  ,''`.  Bartosz Fenski | mailto:fenio@debian.org | pgp:0x13fefc40 | irc:fEnIo
 : :' :       32-050 Skawina - Glowackiego 3/15 - malopolskie v. - Poland
 `. `'           phone:+48602383548 | proud Debian maintainer and user
   `-            http://fenski.pl | xmpp:fenio@jabber.org | rlu:172001

Re: tail -f w perlu

#51927

Author: Andrzej Adam Filip
Date: Tue, 25 May 2010 22:34

25 lines
2101 bytes

Maciej Misiak <grizzley@poczta.onet.pl> pisze:
> Krótko.
> Komendą nieperlową 'tail -f plik_logu.log' oglądam na żywca logi
> generowane przez program.
> Logi zawierają kilka śmieci, które niebotycznie wydłużają i
> zaciemniają i chcę je przefiltrować. Oczywiście perlem, bo nie znam
> chwilowo nic lepszego. Jest jakaś opcja może żeby perl też działał na
> żywca? Próbowałem
>
> perl -pe 's/tu cos//; s/tu cos innego//' plik_logu.log | tail -f
>
> ale oczywiście nie działa to tak, jak bym się spodziewał.
> Kwestia zastosowania dodatkowych pakietów z CPANa jest do rozważenia.
> Ewentualnie może inne pokrewne toole jak awk?

http://www.perl.com/doc/FAQs/FAQ/oldfaq-html/Q5.22.html
How do I do a "tail -f" in Perl?

To nie jest "dokładny przepis" ale chyba "wskaże drogę".

-- 
Andrzej Adam Filip : anfi@onet.eu : Andrzej.Filip@gmail.com
Jak większe jest szczęście być zdrowym niż bogatym,
tak mniejszym jest nieszczęściem ubóstwo niż choroba.
  -- Sokrates (469-399 p.n.e)

Re: tail -f w perlu

#51928

Author: Michal Jankowski
Date: Wed, 26 May 2010 07:59

8 lines
914 bytes

  use File::Tail;
  $file=File::Tail->new("/some/log/file");
  while (defined($line=$file->read)) {
      print "$line";
  }

  MJ

Re: tail -f w perlu

#51929

Author: FrankyLu
Date: Mon, 14 Jun 2010 17:22

6 lines
851 bytes

Może przydają Ci się regexpy? Zobacz: http://www.continuum.com.pl/regexp/
regexp3.html 

Oczywiście możesz załatwić sprawę również sedem.

Franky

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads