perl -e "$pid = open PIPE, '-|', 'echo one two';$/=' '; while (<PIPE>){ print; kill 2, $pid}"