Help for this page
open SAVE_OUT, '>&STDOUT'; ... my @stdout = <READOUT>; open STDOUT, '>&SAVE_OUT';