binmode(STDOUT, ':encoding(cp437)') if $^O eq 'MSWin32';