BEGIN {
	binmode(STDOUT, ":encoding(cp850)");
	binmode(STDIN, ":encoding(cp850)");
}