foreach my $datei (@dateien)
{
    open (Inhalt,"<","$datei");
    print $datei."\n" if grep {/logging/} <Inhalt>;
     close (Inhalt);
}