open my $FILE,'<', "log.txt"; # Datei ist anfangs leer !
my @lines = <$FILE>;
close ($FILE);