open ($log_file, ">", $log_file) or die "Can not open file $log_file, $!";