O'Reilly logo

Programmieren mit Perl by Jon Orwant, Tom Christiansen, Larry Wall

Stay ahead with the world's most comprehensive technology and business learning platform.

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, tutorials, and more.

Start Free Trial

No credit card required

IPC::Open3

use IPC::Open3;

local (*HIS_IN, *HIS_OUT, *HIS_ERR);

$childpid = open3(*HIS_IN, *HIS_OUT, *HIS_ERR, $cmd, @args);
print HIS_IN"stuff\n";
close(HIS_IN);                # EOF an Child übergeben.
@outlines = <HIS_OUT>;  # Lesen bis EOF.
@errlines = <HIS_ERR>;  # XXX: potentielle Blockung
print "STDOUT:\n", @outlines, "\n";
print "STDEFIR:\n", @errlines, "\n";
close HIS_OUT;
close HIS_EKR;
waitpid($childpid, 0);
if ($?) {
    print "Child endete mit wait-Status $?\n";
}

Das IPC::Open3-Modul funktioniert wie IPC::Open2 (ersteres ist mit Hilfe des zweiten implementiert), nur daß open3 den Zugriff auf die Standardeingabe-, Standardausgabe-und Standardfehler-Handles des von Ihnen gestarteten Programms bietet. Es gelten die gleichen Vorbehalte wie bei open2 (s.o. ...

With Safari, you learn the way you learn best. Get unlimited access to videos, live online training, learning paths, books, interactive tutorials, and more.

Start Free Trial

No credit card required