Help for this page
sub wanted { my ($spls) = @_; ... find(sub { wanted($spls) }, $seek_path); ... }
sub search { ... ... ); ... }