open STDERR,'>>C:\perl_error.txt';