sub recursion{ findDir($dir, $min, $max); } sub findDir{ my ($dir, $min_depth, $max_depth) = @_; }