open(FILE, "< :encoding(cp1252)", $filename); # Lesezugriff