open( my $READ, '<', $file ) or die "Fehler beim oeffnen von Datei '$file' ($!), died at";
 push( @lines, <$READ> );
 close( $READ );