$File::Find::prune = 1 indicates that Find shouldn't recurse any further down the directory tree from the current folder.