Syslog an HTTP in (beinahe) Echtzeit (Allgemeines zu Perl)

[thread]18655[/thread]

Syslog an HTTP in (beinahe) Echtzeit

Tags: perl5 Ähnliche Threads

Leser: 15

Articles: hide open all | hide show old branches

+7 replies
mordur

2013-10-07 14:42

User since
2003-09-25
182 Artikel
BenutzerIn

Ich habe vor die Einträge aus dem Syslog (eventuell noch gefiltert) in beinah Echtzeit auf einer Webseite anzuzeigen. Gibt es dafür Module die das schon machen? Hat jemand so etwas schon mal gelöst?
- bianca
  
  2013-10-07 14:56
  
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  
  Verstehe die Anforderung nicht ganz.
  Ein CGI Script, dass das access Log anzeigt braucht kein Modul, oder?
  10 print "Hallo"
  20 goto 10
- gelöscht 2013-10-07 15:00
- GwenDragon
  
  2013-10-07 15:02
  
  User since
  2005-01-17
  14748 Artikel
  Admin1
  
  2013-10-07T12:42:41 mordur
  Ich habe vor die Einträge aus dem Syslog (...)
  Um was für ein Log handelt es sich genau? Wegen des Logformats.
  
  Du kannst mit Tie::Syslog das Syslog beqeuem auslesen.
  
  Nicht alle Systemlogs haben Leserechte für andere.
  Und CGIs laufen meist unter einem eingeschränkten Konto, das vielleicht auch keien Leserechte besitzt.
  
  Du könntes ein Perlprogramm dazu nutzen wie bei tail die letzten Einträge einzulesen und die mit JSON an die Webseite zu senden.
  Auf der Webseite wird dann mit AJAX das ganze angezeigt.
  Last edited: 2013-10-07 15:05:01 +0200 (CEST)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- +2 replies
- mordur
  
  2013-10-07 15:18
  User since
  2003-09-25
  182 Artikel
  BenutzerIn
  ich habe mir mal das hier gebastelt:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7
  
  my $command = "tail -f /var/log/syslog"; if ( open(F, "$command | ") ) { while (<F>) { print $_."<br>"; } close(F);
  
  Wenn ich Leserechte auf das syslog gebe, funktioniert das sogar.
  So in etwa hatte ich mir das gedacht. Nur das hier nicht das Syslog an sich interessiert, sondern Dienste, die da rein schrieben. Also werde ich das Log dieser Dienste auf eine andere Datei schieben, welche vom Apachen dauerhaft lesbar ist. Dann müsste es den Zweck erfüllen.
  
  modedit Editiert von GwenDragon: Code bitte in CODE- oder PERL-Tags!
  Last edited: 2013-10-07 15:35:15 +0200 (CEST)
  - GwenDragon
    
    2013-10-07 15:39
    
    User since
    2005-01-17
    14748 Artikel
    Admin1
    
    2013-10-07T13:18:14 mordur
    Nur das hier nicht das Syslog an sich interessiert, sondern Dienste, die da rein schrieben.
    Auch das gibst was vom schlauen Tim Towdy: http://perl-howto.de/2009/07/parsesyslog-syslogdat...
    die Drachin Gwen
    
    Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- GwenDragon
  
  2013-10-07 15:36
  
  User since
  2005-01-17
  14748 Artikel
  Admin1
  
  Um Dateien mit Perl wie mit tail auszulesen gibts auch das Modul File::Tail.
  Beispiele: http://perl-howto.de/2009/06/filetail-logdateien-b...
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2013-10-07 14:42.