Help for this page

Select Code to Download


  1. or download this
    sub search {
      my $wanted = shift;
    ...
      }
    }
    # I don't care about the File::Find ... how do you pass the block to a
    +nother subroutine/method? 
    
  2. or download this
    sub walk_tree {
      my ($self, $branch_handler, $leaf_handler) = @_;
    ...
       }
      }
    }