BEGIN
{
    open (STDOUT, ">&STDERR") if ($ENV{'CRON'});
}