for (grep(-d, glob("$_[0]/*"))) {
    walktree($_);
  }

  walktree($_) for (grep(-d, glob("$_[0]/*")));