Select Code to Download

sub wanted {
  local $_ = $File::Find::name;
...
    load_tree( $tree{$rootdir}, fileparse( $_ ));
  }
}