🚀 go-pugleaf

Tomasz Pilat <tomekp@fenix.xyz.lublin.pl> pisze:
> [...]
> Uruchomić program.exe i ze skryptu poczęstować go danymi (@TABLICA).
> Kazda linia na wejsciu (STDIN progamu) produkuje zero lub jedna linię na
> wyjsciu (STDERR programu). Chce wczytać wszystko co wyszlo na STDERR
> programu do tablicy. I potem, gdy program.exe zakończy dziłanie,
> zajać się tą tablicą.
> [...]

Jezeli zewnetrzny program pisze wylacznie do stderr, to rozwiazanie
moze byc na przyklad takie (nie mialem zadnego program.exe):

  @dane = ( 1, 2, 3 );
  $program = "xargs ls"; 
  $tmp = "/tmp/$$";

  umask 077;
  open( f, ">$tmp" );
  print f join( "\n", @dane ), "\n";
  close( f );

  @wynik = split( /\n+/, `$program < $tmp 2>&1` );
  unlink $tmp;

  print "wynik: ", join( ", ", @wynik );

W razie koniecznosci oddzielenie stdout od stderr wywolywanego programu
pomoc moze... Perl FAQ, a konkretnie odpowiedz na pytanie "How can I capture
STDERR from an external command?".

Pozdrawiam: Artur Urbanowicz