Unix::Conf::Bind8::Conf::Comment - Class for handling comments


Unix-Conf-Bind8 documentation  | view source Contained in the Unix-Conf-Bind8 distribution.

Index


NAME

Top

Unix::Conf::Bind8::Conf::Comment - Class for handling comments between directives.

SYNOPSIS

Top

	use Unix::Conf::Bind8;

	my ($conf, $acl);
	$conf = Unix::Conf::Bind8->new_conf (
		FILE        => '/etc/named.conf',
		SECURE_OPEN => 1,
	) or $conf->die ("couldn't open `named.conf'");

	$acl = $conf->new_acl (
		NAME		=> 'extremix.net-slaves',
		ELEMENTS	=> [ qw (10.0.0.2 10.0.0.3) ],
	) or $acl->die ("couldn't create acl `extremix.net-slaves'");

	$comment = $conf->new_comment (
		COMMENT		=> '// Elements of this Acl are allowed to transfer this zone',
		WHERE		=> 'BEFORE',
		WARG		=> $acl,
	) or $comment->die ("couldn't create comment");

This class is not meant to be used directly, but is used instead by the parser to store intra directive comments.

METHODS

Top

new ()
 Arguments
 COMMENT	=> 'comment',
 WHERE  => 'FIRST'|'LAST'|'BEFORE'|'AFTER'
 WARG   => Unix::Conf::Bind8::Conf::Directive subclass object
                        # WARG is to be provided only in case WHERE eq 'BEFORE 
                        # or WHERE eq 'AFTER'
 PARENT	=> reference,   # to the Conf object datastructure. 

Class constructor Creates a Unix::Conf::Bind8::Conf::Comment object and returns it, on success, an Err object otherwise. Do not use this constructor directly. Use the Unix::Conf::Bind8::Conf::new_comment method () instead.

comment ()

Object method. Get/set the comment. If argument is passed, sets the comment, and returns true on success, an Err object otherwise. If no argument is passed, returns the set value.


Unix-Conf-Bind8 documentation  | view source Contained in the Unix-Conf-Bind8 distribution.