use Data::Dumper
open( DATEI, '< text') or die $!;
my @array = <DATEI>;
print Dumper \@array;
close DATEI;