foreach(@array){
    my $daten1 = $_;
    # weiterer Code
}