Konsolenausgabe von externem Programm loggen (Allgemeines zu Perl)

[thread]15666[/thread]

Konsolenausgabe von externem Programm loggen

Leser: 12

Articles: hide open all | hide show old branches

+4 replies
Gast Thomas

2010-11-25 14:11
Hallo zusammen,

ich versende unter Perl Emails mit Blat, was ein Kommandozeilentool zum -Überraschung- versenden von Emails unter Windows ist. Blat gibt mir eine Ausgabe auf die Konsole aus, die über Erfolg, Mißerfolg etc. berichtet.
Code (perl): (dl )

1 2

open(MAIL,"| echo $message | blat $blat_cmd"); close MAIL;
Jetzt habe ich noch ein Filehandle $LOGFILE und möchte die Ausgabe von blat gerne in dieses umleiten.

Wie stelle ich das denn an? Blat war übrigens eine Vorgabe, deswegen wurde es nicht direkt mit Perl gelöst.

Vielen Dank für die Hilfe!
Last edited: 2010-11-25 14:24:18 +0100 (CET)
- +2 replies
- Gast Toto
  
  2010-11-25 15:48
  Code (perl): (dl )
  
  1 2 3
  
  open(MAIL,"| echo $message | blat $blat_cmd |"); while (<MAIL>) { print "$_"; } close MAIL;
  
  sollte da eigentlich funktionieren.
  Last edited: 2010-11-25 15:50:30 +0100 (CET)
  - Gast Thomas
    
    2010-11-25 15:58
    Ich habe ein
    
    Code (perl): (dl )
    
    while (<MAIL>) { print $LOGFILE "$_"; }
    
    eingefügt, leider findet sich im Logfile aber nichts.
    Um Mißverständnissen vorzubeugen: Die Ausgabe von Blat wird in der Konsole schon ausgegeben, soll aber halt in das Logfile fließen.
    Last edited: 2010-11-25 16:01:40 +0100 (CET)
- Linuxer
  
  2010-11-25 15:56
  
  User since
  2006-01-27
  3891 Artikel
  HausmeisterIn
  
  Hi,
  
  schau Dir mal IPC::Open2 an.
  
  edit: oder auch IPC::Open3
  Last edited: 2010-11-25 16:03:50 +0100 (CET)
  meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
  Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!

View all threads created 2010-11-25 14:11.