open (SAVEERR, ">&STDERR") or die "Unable to copy STDERR : $!";
open (STDERR, ">stderr") or die "Unable to open new STDOUT : $!";
select STDERR;
$| = 1;
select STDOUT;