$io->open($in_file, "<:raw:encoding(cp1252)")  ||  die(...);