Programmieren mit Perl

IPC::Open2

use IPC::Open2;

local(*HIS_OUT, *HIS_IN); # Bei Bedarf lokale Handies anlegen.

$childpid = open2(*HIS_OUT, *HIS_IN, $program, @args)
    or die "Kann Pipe zu $program nicht öffnen: $!";
print HIS_IN "Hier ist Ihre Eingabe\n";
$his_output = <HIS_IN>;
close(HIS_OUT);
close (README);
waitpid($childpid, 0);

Die vom IPC::Open2-Modul exportierte Funktion open2 startet ein anderes Programm und ermöglicht den Lese- und Schreibzugriff auf diesen Befehl. Die beiden ersten Argumente müssen gültige Dateihandies sein (oder leere Variablen, in denen automatisch generierte Dateihandies abgelegt werden können). Die verbliebenen Argumente bilden den Programmnamen und dessen Argumente, die nicht der Interpretation durch die Shell unterliegen, wenn sie einzeln ...