Config::Model::TreeSearcher - Search tree for match in value, description...
version 2.074
use Config::Model ; use Log::Log4perl qw(:easy) ; Log::Log4perl->easy_init($WARN); # define configuration tree object my $model = Config::Model->new ; $model ->create_config_class ( name => "MyClass", element => [ [qw/foo bar/] => { type => 'leaf', value_type => 'string' }, baz => { type => 'hash', index_type => 'string' , cargo => { type => 'leaf', value_type => 'string', }, }, ], ) ; my $inst = $model->instance(root_class_name => 'MyClass' ); my $root = $inst->config_root ; my $step = 'baz:fr=bonjour baz:hr="dobar dan" foo="journalled"'; $root->load( step => $step ) ; my @result = $root->tree_searcher(type => 'value')->search('jour'); print join("\n",@result),"\n" ; # print # baz:fr # foo
This class provides a way to search the content of a configuration tree. Given a keyword or a pattern, the search method will scan the tree to find a value, a description or anything that match the given pattern (or keyword).
Creates a new searcher object. The type parameter can be:
type
Search in all the items above
Search the keyword or pattern in the tree. The search is done in a case insensitive manner. Returns a list of path pointing to the matching tree element. See "grab(...)" in Config::Model::AnyThing for details on the path syntax.
Creating a class with just one search method may be overkill. OTOH, it may be extended later to provide iterative search.
Dominique Dumont, (ddumont at cpan dot org)
Config::Model, Config::Model::SearchElement, Config::Model::AnyThing
Dominique Dumont
This software is Copyright (c) 2015 by Dominique Dumont.
This is free software, licensed under:
The GNU Lesser General Public License, Version 2.1, February 1999
To install Config::Model, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Config::Model
CPAN shell
perl -MCPAN -e shell install Config::Model
For more information on module installation, please visit the detailed CPAN module installation guide.