my $fh;

open($fh, «datei.txt");