if ( keys(%known_dirs) ) {
  my @known_dirs = keys(%known_dirs);
  my $known_dirs_filename = "$dir/known_dirs.list";
  write_list_to_logfile(\@known_dirs, $known_dirs_filename);
}