open(DATA,"file01.txt");
@satz = <DATA>;
close(DATA);