my $pid = open PIPE, "theCommand arg1 arg2 |" or die $!;
my @input = map scalar <PIPE>, 1 .. 4; ##
kill 3, $pid;