my $child_pid = open( my $out, "-|", "some command" );