foreach my $logName (keys %loglist) {
        unless (defined $dirlist{$logName}) { push @difference, "$logName";}
    }