opendir(DATADIR, "files/$department") or die "Invalid directory!";
@duplicate = readdir(DATADIR);
closedir(DATADIR);

foreach $item (@duplicate) {
   if ($item eq "files/$department/$number.txt") {
      $go_sub = 'yes';
      last;
   }
}