Noch eine STDIN Frage (Allgemeines zu Perl)

[thread]15178[/thread]

Noch eine STDIN Frage

Leser: 19

Articles: hide open all | hide show old branches

+7 replies
RPerl

2010-06-23 11:10

User since
2006-11-26
384 Artikel
BenutzerIn

Huhu,

ich hatte glaube ich schon mal eine aehnliche Frage im IRC gefragt gehabt, aber konnte es am Ende doch nicht beheben. Wenn ich auf der bash program1 | program2 ausfuehre und program1 etwas auf STDIN schickt, allerdings noch nicht komplett fertig ist mir seiner Ausgabe, dann faengt mein Programm program2 schon gleich an zu lesen und wartet nicht bis program1 auch wirklich ganz fertig ist. Das fuehrt hin und wieder zu Fehlern, insbesondere dann, wenn die Ausgabe von program1 mal laenger dauert.

Weiss zufaellig hier jemand, wie man sowas beheben kann? Mir bringen nur vollstaendige Daten bei program2 etwas.

Danke!

R
- +6 replies
- pq
  
  2010-06-23 11:22
  
  User since
  2003-08-04
  12209 Artikel
  Admin1
  
  wie liest du denn in program2 STDIN ein? und wie lange sind die pausen?
  was meinst du mit "fuehrt hin und wieder zu Fehlern"? was führt zu einem fehler? wie äussert sich der fehler?
  wenn mich nicht alles täuscht, müsstest du einfach nur bis zum ende von STDIN abwarten und dann was mit den eingelesenen daten machen.
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +5 replies
  - RPerl
    
    2010-06-23 11:30
    User since
    2006-11-26
    384 Artikel
    BenutzerIn
    
    Hi Tina,
    
    Quote
    wie liest du denn in program2 STDIN ein?
    
    hab den genauen code jetzt bloederweise nicht hier. Aber afaik mach ich sowas ala:
    
    Code: (dl )
    
    1 2 3 4 5 6 7
    
    #program2 while(<STDIN>) { # hier tu ich was mit den Daten } [...]
    
    Quote
    und wie lange sind die pausen?
    
    Welche Pausen meinst du? Die von program1? Unterschiedlich. Man weiss nie genau, wann es fertig ist.
    Im Endeffekt will ich 'nur' alle Ausgaben von program1 vollstaendig in progam2 zur Verfuegung
    haben. Zur Weiterverarbeitung. Nun ist es aber irgendwie so, dass mein Programm zu frueh aufhoert zu
    warten und zu lesen.. :/
    
    R.
    
    Edit: program1 koennte z.B. ein find auf *nix sein, was laenger braucht zum Suchen einer Datei.
    Last edited: 2010-06-23 11:33:27 +0200 (CEST)
    - +2 replies
    - pq
      
      2010-06-23 11:37
      
      User since
      2003-08-04
      12209 Artikel
      Admin1
      
      2010-06-23T09:30:27 RPerl
      Quote
      und wie lange sind die pausen?
      
      Welche Pausen meinst du?
      
      du schriebst "wenn die Ausgabe von program1 mal laenger dauert."
      
      weiss halt nicht, wie ich mir das vorstellen soll.
      
      Quote
      Nun ist es aber irgendwie so,
      dass mein Programm zu frueh aufhoert zu warten und zu lesen.. :/
      
      wenn STDIN noch nicht fertig ist, also kein eof schickt, sollte es auch nicht abbrechen. kann ich mit dem code nicht nachvollziehen.
      
      vielleicht hat ja jemand anders eine idee, aber ich wüsste jetzt nicht, wie ich so eine situation hinkriege.
      wenn ich einfach als program1 ein script nehme, dass mehrmals zwischen ausgaben ein sleep macht, wird von zweiten programm trotzdem alles bis zum ende eingelesen. ich kann keinen abbruch reproduzieren.
      Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
      lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
      - RPerl
        
        2010-06-23 11:39
        
        User since
        2006-11-26
        384 Artikel
        BenutzerIn
        
        Hm ok. Dann ist das vielleicht irgendwo ein bug. Ich werde dir - wenn es dir nichts ausmacht - mal den Code schicken,
        wenn ich wieder auf Arbeit bin und Zugriff habe.
    - +2 replies
    - topeg
      
      2010-06-23 12:30
      
      User since
      2006-07-10
      2611 Artikel
      BenutzerIn
      
      mach es mal so:
      
      Code: (dl )
      
      1 2 3 4 5 6 7 8 9
      
      #program2 my @data; push(@data,$_) while(<STDIN>); for(@data){ # hier tu ich was mit den Daten } [...]
      
      Dann macht das Script erst weiter, wenn das STDIN-Handle geschossen wurde.
      
      Dann kannst du auch schauen wie viele Daten ankommen.
      Last edited: 2010-06-23 12:31:58 +0200 (CEST)
      - pq
        
        2010-06-23 12:40
        
        User since
        2003-08-04
        12209 Artikel
        Admin1
        
        naja das hatte ich ja schon gesagt. bis zum ende von STDIN abwarten und dann was mit den eingelesenen daten machen.
        
        entweder mit while oder gleich my @lines = <STDIN>;
        
        wenn RPerl in der schleife natürlich ein last oder so macht, dann ist es natürlich sein fehler, aber ich nehme mal an, dann hätte er uns das mitgeteilt.
        "Nun ist es aber irgendwie so, dass mein Programm zu frueh aufhoert zu warten und zu lesen"
        wenn ein script "irgendwie aufhört zu lesen", nehme ich mal nicht an, dass RPerl selbst die schleife abbricht, dann wäre die lösung ja ziemlich trivial.
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem

View all threads created 2010-06-23 11:10.