config::model::debian::dependency(3pm) [debian man page]
Config::Model::Debian::Dependency(3pm) User Contributed Perl Documentation Config::Model::Debian::Dependency(3pm)NAME
Config::Model::Debian::Dependency - Checks Debian dependency declarations
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 => [
Depends => {
'type' => 'leaf',
'value_type' => 'uniline',
class => 'Config::Model::Debian::Dependency',
},
],
) ;
my $inst = $model->instance(root_class_name => 'MyClass' );
my $root = $inst->config_root ;
$root->load( 'Depends="libc6 ( >= 1.0 )"') ;
# Connecting to qa.debian.org to check libc6 versions. Please wait ...
# Warning in 'Depends' value 'libc6 ( >= 1.0 )': unnecessary
# versioned dependency: >= 1.0. Debian has lenny-security ->
# 2.7-18lenny6; lenny -> 2.7-18lenny7; squeeze-security ->
# 2.11.2-6+squeeze1; squeeze -> 2.11.2-10; wheezy -> 2.11.2-10; sid
# -> 2.11.2-10; sid -> 2.11.2-11;
DESCRIPTION
This class is derived from Config::Model::Value. Its purpose is to check the value of a Debian package dependency for the following:
o syntax as described in http://www.debian.org/doc/debian-policy/ch-relationships.html
o Whether the version specified with ">" or ">=" is necessary. This module will check with Debian server whether older versions can be
found in Debian old-stable or not. If no older version can be found, a warning will be issued. Note a warning will also be sent if the
package is not found on madison and if the package is not virtual.
o Whether a Perl library is dual life. In this case the dependency is checked according to Debian Perl policy <http://pkg-
perl.alioth.debian.org/policy.html#debian_control_handling>. Because Debian auto-build systems (buildd) will use the first available
alternative, the dependency should be in the form :
o "perl (>= 5.10.1) | libtest-simple-perl (>= 0.88)" when the required perl version is available in sid. ".
o "libcpan-meta-perl | perl (>= 5.13.10)" when the Perl version is not available in sid
Cache
Queries to Debian server are cached in "~/.config_model_depend_cache" for about one month.
BUGS
o Virtual package names are found scanning local apt cache. Hence an unknown package on your system may a virtual package on another
system.
o More advanced checks can probably be implemented. The author is open to new ideas. He's even more open to patches (with tests).
AUTHOR
Dominique Dumont, ddumont [AT] cpan [DOT] org
SEE ALSO
Config::Model, Config::Model::Value, Memoize, Memoize::Expire
perl v5.14.2 2012-11-09 Config::Model::Debian::Dependency(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)