- or download this
open( STDOUT, "|-" ) or die ("Can't open standard output: $!\n");
- or download this
my $pid = open( CHILD, "|-" );
unless (defined $pid) {
...
else ($pid) {
# in child process (will read from STDIN)
}
- or download this
my $output = `program -text -brief clone_error <<EOF
$form
...
clone_from=$clone_from
r
EOF`;