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

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)

Check Out this Related Man Page

Config::Model::Backend::Yaml(3pm)			User Contributed Perl Documentation			 Config::Model::Backend::Yaml(3pm)

NAME

       Config::Model::Backend::Yaml - Read and write config as a YAML data structure

VERSION

       version 2.021

SYNOPSIS

	use Config::Model ;
	use Log::Log4perl qw(:easy) ;
	use Data::Dumper ;

	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',
		   },
	       },
	   ],
	 read_config  => [
			   { backend => 'yaml' ,
			     config_dir => '/tmp',
			     file  => 'foo.yml',
			     auto_create => 1,
			   }
			 ],
	) ;

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

	my $root = $inst->config_root ;

	my $step = 'foo=yada bar="bla bla" baz:en=hello
		    baz:fr=bonjour baz:hr="dobar dan"';
	$root->load( step => $step ) ;
	$inst->write_back ;

       Now, "/tmp/foo.yml" contains:

	---
	bar: bla bla
	baz:
	  en: hello
	  fr: bonjour
	  hr: dobar dan
	foo: yada

DESCRIPTION

       This module is used directly by Config::Model to read or write the content of a configuration tree written with YAML syntax in
       "Config::Model" configuration tree.

       Note that undefined values are skipped for list element. I.e. if a list element contains "('a',undef,'b')", the data structure will contain
       'a','b'.

CONSTRUCTOR

   new ( node => $node_obj, name => 'yaml' ) ;
       Inherited from Config::Model::Backend::Any. The constructor will be called by Config::Model::AutoRead.

   read ( io_handle => ... )
       Of all parameters passed to this read call-back, only "io_handle" is used. This parameter must be IO::File object already opened for read.

       It can also be undef. In this case, "read()" will return 0.

       When a file is read,  "read()" will return 1.

   write ( io_handle => ... )
       Of all parameters passed to this write call-back, only "io_handle" is used. This parameter must be IO::File object already opened for
       write.

       "write()" will return 1.

AUTHOR

       Dominique Dumont, (ddumont at cpan dot org)

SEE ALSO

       Config::Model, Config::Model::AutoRead, Config::Model::Backend::Any,

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

Linux and UNIX Man Pages

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

Check Out this Related Man Page