Ausgabe "realtime" auslesen - #64140 (Allgemeines zu Perl)

aedu0

2006-03-28 23:15

User since
2006-03-28
1 Artikel
BenutzerIn
[default_avatar]

Salü Zusammen

Ich möchte ein CLI-Skript, welches etwas ausgibt, in einem zweiten CLI-Skript ausführen und die Ausgaben "Realtime" darstellen.

Ich habe nun diese zwei (Beispiel-)Skripte:

skript1.pl

Code: (dl )

#!/usr/bin/perl -w
use strict;
my $i = 0;

while ($i < 10) {
        print "bla\n";
        sleep(1);
        $i++;
}

skript2.pl

Code: (dl )

#!/usr/bin/perl -w
use strict;

my $output;
$output = `./skript1.pl`;
print $output;

Im Moment ist es so, dass natürlich zuerst das skript1.pl ausgeführt wird, alle Ausgaben in $output geschrieben werden und danach alles aufs mal ausgegeben wird.
Was ich jedoch möchte ist, dass sobald skript1.pl etwas ausgibt (bzw. an skript2.pl übergibt) dies von skript2.pl sogleich ausgegeben wird. - und nicht alles aufs mal wie bisher!

Vielen Dank für die Hilfe