open(STDERR, '>', 'stderr.log') || die "Can't redirect STDERR: $!"; select(STDERR); $| = 1;