# IN ALL CASES: we list the available directories
# in "data" (level 1, not hidden, not archived)
my @dirs = File::Find::Rule->directory
                           ->maxdepth(1)
                           ->not_name('.*')
                           ->not_name('_*')
                           ->in($place_to_store);