open my $file, "<", "Datei1.dat" or die $!;
my @Datei1 = <$file>;
close $file;