open FILEHANDLE_INPUT, "<:encoding(MacRoman)", $FILENAME_INPUT || die "Abbruch! Perl meldet: [$!]";
our @ALLE_ALTEN_ZEILEN = <FILEHANDLE_INPUT>;
close(FILEHANDLE_INPUT) || die "Abbruch! Perl meldet: [$!]";