Log::Log4perl Log-Einträge unvollständig (Fragen zu Perl-Modulen)

[thread]19700[/thread]

Log::Log4perl Log-Einträge unvollständig

Tags: perl5 LogFormat log fehler log4perl logfile Ähnliche Threads

Leser: 17

Articles: hide open all | hide show old branches

+4 replies
RealArties

2015-06-21 19:09
User since
2014-09-04
2 Artikel
BenutzerIn
Guten Abend,

ich habe aktuell ein kleines Problem mit Log4Perl, und zwar wenn Einträge aus ein und derselben Zeile im Code geloggt werden soll (innerhalb einer Schleife), dann werden die Einträge teilweise abgeschnitten, kurioserweise aber am Anfang(!)!

Beispiel:
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11

foreach my $value ( keys( %{$serialKeys} ) ) { if ($log->is_debug()) { my $log_message = 'ID: '. $serialKeys->{$value}->{'id'}.' :: ArtNr.: '.$serialKeys->{$value}->{'keyArt'}.' :: '. $serialKeys->{$value}->{'keyKonto'}.' :: '.$serialKeys->{$value}->{'key'}.' :: '. $serialKeys->{$value}->{'serial'}.' :: '.$serialKeys->{$value}->{'comment'}.' :: '. $serialKeys->{$value}->{'change'}.' :: '.$serialKeys->{$value}->{'user'}.' :: '. $serialKeys->{$value}->{'value'}.' :: '.$serialKeys->{$value}->{'free'}; $log->debug( $log_message ); } }
Die Ausgabe ist dann wie folgt:

Quote
DEBUG - ID: 2 :: ArtNr.: 14500 :: 1 :: 0123456789 :: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
DEBUG - ID: 3 :: ArtNr.: 14501 :: 1 :: 1234567890 :: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
:: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
:: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
:: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
:: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1

Sollte doch aber eigentlich so aussehen:

Quote
DEBUG - ID: 2 :: ArtNr.: 14500 :: 1 :: 0123456789 :: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
DEBUG - ID: 3 :: ArtNr.: 14501 :: 1 :: 1234567890 :: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
DEBUG - ID: 4 :: ArtNr.: 14502 :: 1 :: 2345678901 :: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
DEBUG - ID: 5 :: ArtNr.: 14503 :: 1 :: 3456789012 :: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
DEBUG - ID: 6 :: ArtNr.: 14504 :: 1 :: 4567890123 :: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1
DEBUG - ID: 7 :: ArtNr.: 14505 :: 1 :: 5678901234 :: :: :: 2015-05-31 12:14:46 :: asc2000 :: 16.000000 :: 1

Die Config für Log4Perl sieht wie folgt aus:
Code: (dl )

1 2 3 4 5 6

log4perl.logger.Serial=TRACE, SerialLog log4perl.appender.SerialLog=Log::Log4perl::Appender::File log4perl.appender.SerialLog.mode=append log4perl.appender.SerialLog.syswrite=1 log4perl.appender.SerialLog.filename=Serial.log log4perl.appender.SerialLog.layout=SimpleLayout
aber auch folgende andere Configuration brachte den gleichen Fehler:
Code: (dl )

1 2 3 4 5 6

log4perl.logger.Serial=TRACE, SerialLog log4perl.appender.SerialLog=Log::Dispatch::File log4perl.appender.SerialLog.filename=Serial.log log4perl.appender.SerialLog.mode=append log4perl.appender.SerialLog.layout=Log::Log4perl::Layout::PatternLayout log4perl.appender.SerialLog.layout.ConversionPattern=%d %p> %F{1}:%L %M - %m%n
Jemand eine Idee? Ich bin leider weder hier im Forum, bei CPAN und Google fündig geworden! :-/

Danke für eure Ideen & Hilfe,
Arties
Last edited: 2015-06-21 19:18:01 +0200 (CEST)
- +3 replies
- GwenDragon
  
  2015-06-21 19:54
  
  User since
  2005-01-17
  14790 Artikel
  Admin1
  
  Welches Betriebssystem,
  welches Perl,
  welche Modulversion?
  
  Schon mal geprüft ob wirklich Daten in %$serialKeys drin sind?
  
  Geht so:
  1. Am Anfang use Data::Dumper; hinzufügen
  2. in Zeile 2 mit say Dumper($serialKeys); auf Konsole ausgeben
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +2 replies
  - RealArties
    
    2015-06-21 21:55
    
    User since
    2014-09-04
    2 Artikel
    BenutzerIn
    
    Betriebssystem: Ubuntu 12.12
    Perl: v5.18.2
    Modulversion: 1.4100 (Log::Log4perl)
    
    Und ja in %$serialKeys stehen die Daten drin, das hatte ich schon geprüft! Dumper ist vollständig und ansonsten wären wenigstens der LogTyp "Debug" die Namen "ID" und "ArtNr" sowie die Trennzeichen :: im Logfile vollständig, selbst wenn die Daten im Hash nicht drin wären. ;)
    
    Noch eine Idee?
    - jan
      
      2015-06-22 11:59
      
      User since
      2003-08-04
      2536 Artikel
      ModeratorIn
      
      kann man es reproduzieren?
      Also kannst du ein relativ kurzes script schreiben, das nach XXXX log-einträgen solche zeilen produziert hat? Dann poste das mal, damit wir sehen können, ob andere mit anderen Umgebungen zum selben Problem gelangen.
      
      Hast Du geschaut, ob vielleicht Steuerzeichen irgendwo in den Messages sind, also zB CR oder so? (unsicher, ob das Auswirkungen haben würde, aber wer weiß)
      
      Hast Du schon mal ein Up-/Downgrade von Log4perl versucht?

View all threads created 2015-06-21 19:09.