Class::Accessor::Assert.3pm

Langue: en

Version: 2006-09-05 (mandriva - 01/05/08)

Section: 3 (Bibliothèques de fonctions)

Sommaire

NAME

Class::Accessor::Assert - Accessors which type-check

SYNOPSIS

   use Class::Accessor::Assert;
   __PACKAGE__->mk_accessors( qw( +foo bar=Some::Class baz @bits ) );

DESCRIPTION

This is a version of Class::Accessor which offers rudimentary type-checking and existence-checking of arguments to constructors and set accessors.

To specify that a member is mandatory in the constructor, prefix its name with a "+". To specify that it needs to be of a certain class when setting that member, suffix "=CLASSNAME". Unblessed reference types such as "=HASH" or "=ARRAY" are acceptable.

To specify that a member is an array, prefix its name with a "@". These members also have the following four special methods that wrap the builtin array operations "push", "pop", "unshift", and "shift":

     # for a @bits member:
     
     $y->bits_push(@new_values);
     print $y->bits_pop;
     
     $y->bits_unshift(@new_values);
     print $y->bits_shift;

The "@" can be combined with the "+" prefix to make a member that is an array that you must set in the constructor. The "+" must precede the "@".

     # 'foo' is required in the constructor
     __PACKAGE__->mk_accessors(qw( +@foo ));

SEE ALSO

Class::Accessor

AUTHOR

This module is maintained by 
   Steffen Mueller, accessor-module at steffen-mueller dot net

Original author is

   Simon Cozens, simon@simon-cozens.org

Please direct inquiries, bug reports, etc. towards the maintainer, not the original author. Simon no longer provides support for this module, so please respect that.

Copyright 2003 by Simon Cozens

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.