BEGIN{
	open FH1, '>', 'my.log' or die $!;
	*STDOUT = *FH1;
}