open IN, ">", $file;