[Kazun]

Код:

#File.WriteAllText - This method uses UTF-8 encoding without a Byte-Order Mark (BOM), so using the GetPreamble method will return an empty byte array. 
$o = 'CoordSys NonEarth Units "m"'
$n = 'CoordSys Earth Projection 8, 1001, "m", 61.0333333333002, 0, 1, 2300000, -5509414.7'
dir C:\*.tab | Foreach {
	$f = Get-Content $_.FullName
	if($f[11].Contains($o)) {
		$f[11] = $n
		[IO.File]::WriteAllLines($_.FullName, $f)
	}
}