Help for this page
foreach my $logName (keys %loglist) { unless (defined $dirlist{$logName}) { push @difference, "$logN +ame";} }