open(HANDLE, "<", $filename)  or die "Kann $filename nicht öffnen $!\n";