open my $THELOG, '>&', \*STDOUT or die $!;