my @diff = grep{ my $i = $_; !grep{$_ eq $i}@logfilelist2 }@logfilelist1; print "in logfilelist1, aber nicht in liste2:\n\n"; print $_,"\n" for @diff