Mercurial > pub > Impl
view Lib/IMPL/Class/Member.pm @ 144:b56ebc31bf18
Empty nodes no more created while transforming a post request to the DOM document
minor speed improvements to the object CTOR caching
Added support for a secure processing (and 'laundering' ) a CGI parameters
Many minor fixes
author | wizard |
---|---|
date | Tue, 13 Jul 2010 02:05:38 +0400 |
parents | 16ada169ca75 |
children | 76515373dac0 |
line wrap: on
line source
package IMPL::Class::Member; use strict; use base qw(Exporter); our @EXPORT = qw(virtual public private protected); use IMPL::Class::Meta; require IMPL::Class::MemberInfo; use constant { MOD_PUBLIC => 1, MOD_PROTECTED => 2, MOD_PRIVATE => 3 }; sub virtual($) { $_[0]->Virtual(1); $_[0]; } sub public($) { $_[0]->Access(MOD_PUBLIC); $_[0]->Implement; $_[0]; } sub private($) { $_[0]->Access(MOD_PRIVATE); $_[0]->Implement; $_[0]; } sub protected($) { $_[0]->Access(MOD_PROTECTED); $_[0]->Implement; $_[0]; } 1;