NAME

Config::Model::Backend::ShellVar - Read and write config as a SHELLVAR data structure

VERSION

version 2.026_2

SYNOPSIS

use Config::Model;
use Log::Log4perl qw(:easy);
Log::Log4perl->easy_init($WARN);

my $model = Config::Model->new;
$model->create_config_class (
   name    => "MyClass",
   element => [ 
       [qw/foo bar/] => {qw/type leaf value_type string/}
   ],

  read_config  => [
       { 
           backend => 'ShellVar',
           config_dir => '/tmp',
           file  => 'foo.conf',
           auto_create => 1,
       }
   ],
);

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

$root->load('foo=FOO1 bar=BAR1' );

$inst->write_back ;

File foo.conf now contains:

## This file was written by Config::Model
## You may modify the content of this file. Configuration 
## modifications will be preserved. Modifications in
## comments may be mangled.
##
foo="FOO1"

bar="BAR1"

DESCRIPTION

This module is used directly by Config::Model to read or write the content of a configuration tree written with SHELLVAR 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 => 'shellvar' ) ;

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,