config::model::treesearcher(3pm) [debian man page]

Config::Model::TreeSearcher(3pm)			User Contributed Perl Documentation			  Config::Model::TreeSearcher(3pm)

NAME

       Config::Model::TreeSearcher - Search tree for match in value, description...

VERSION

       version 2.021

SYNOPSIS

	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("
",@result),"
" ;
	# print
	#  baz:fr
	#  foo

DESCRIPTION

       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).

Constructor
   new (type => [ value | description ... ] )
       Creates a new searcher object. The "type" parameter can be:

       element
       value
       key
       summary
       description
       help
       all Search in all the items above

Methods
   search(keyword)
       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.

BUGS

       Creating a class with just one search method may be overkill. OTOH, it may be extended later to provide iterative search.

AUTHOR

       Dominique Dumont, (ddumont at cpan dot org)

SEE ALSO

       Config::Model, Config::Model::SearchElement, Config::Model::AnyThing

perl v5.14.2							    2012-11-09					  Config::Model::TreeSearcher(3pm)

Config::Model::Report(3pm)				User Contributed Perl Documentation				Config::Model::Report(3pm)

NAME

       Config::Model::Report - Reports data from config tree

VERSION

       version 2.021

SYNOPSIS

	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    => "Foo",
	   element => [
	       [qw/foo bar/] => {
		   type       => 'leaf',
		   value_type => 'string'
	       },
	   ],
	   description => [
	       foo => 'some foo explanation',
	       bar => 'some bar explanation',
	   ]
	);

	$model->create_config_class(
	   name => "MyClass",

	   element => [

	       [qw/foo bar/] => {
		   type       => 'leaf',
		   value_type => 'string'
	       },
	       my_enum => {
		   type       => 'leaf',
		   value_type => 'enum',
		   choice     => [qw/A B C/],
		   help       => {
		       A => 'first letter',
		       B => 'second letter',
		       C => 'third letter',
		   },
		   description => 'some letters',
	       },
	       hash_of_nodes => {
		   type       => 'hash',     # hash id
		   index_type => 'string',
		   cargo      => {
		       type		 => 'node',
		       config_class_name => 'Foo'
		   },
	       },
	   ],
	);

	my $inst = $model->instance(root_class_name => 'MyClass' );

	my $root = $inst->config_root ;

	# put data
	my $step = 'foo=FOO my_enum=B hash_of_nodes:fr foo=bonjour -
	  hash_of_nodes:en foo=hello ';
	$root->load( step => $step );

	print $root->report ;
	#  foo = FOO
	#
	#  my_enum = B
	#	  DESCRIPTION: some letters
	#	  SELECTED: second letter
	#
	# hash_of_nodes:en foo = hello
	#	  DESCRIPTION: some foo explanation
	#
	# hash_of_nodes:fr foo = bonjour
	#	  DESCRIPTION: some foo explanation

DESCRIPTION

       This module is used directly by Config::Model::Node to provide a human readable report of the configuration. This report includes the
       configuration values and (if provided by the model) the description of the configuration item and their effect.

       A "report" will show "all" configuration items. An "audit" will show only configuration items which are different from their default value.

CONSTRUCTOR

   new ( )
       No parameter. The constructor should be used only by Config::Model::Node.

Methods
   report
       Returns a string containing the configuration values and (if provided by the model) the description of the configuration item and their
       effect.

       Parameters are:

       audit
	   Set to 1 to report only configuration data different from default values. Default is 0.

       node
	   Reference to the Config::Model::Node object that is dumped. All nodes and leaves attached to this node are also dumped.

AUTHOR

       Dominique Dumont, (ddumont at cpan dot org)

SEE ALSO

       Config::Model,Config::Model::Node,Config::Model::Walker

perl v5.14.2							    2012-11-09						Config::Model::Report(3pm)