while(<DATEN>)
{
    push(@zeilen,$_);
}

# ist dasselbe wie:

my @zeilen = <DATEN>;