Help for this page
{ local *FOO; ... system @command; open STDOUT, ">&FOO"; # dup2(fileno(FOO), 1) }