open FILE, "+>", $filename or die $!;