perl -MIPC::Open3 -e " open3(\*IN,q{>&STDOUT},q{>&STDERR},qw[perl -pe 1 ]); print IN 666,$/; close IN; sleep 3 "