open(NEW,">$dir/$file.new") or die "Can't open $dir/$file.new: $!"