Mercurial > pub > Impl
view Lib/IMPL/Object/Fields.pm @ 373:3ca44e23fd1f
implemented new web resource
author | cin |
---|---|
date | Wed, 25 Dec 2013 17:29:38 +0400 |
parents | 4d0e1962161c |
children |
line wrap: on
line source
package IMPL::Object::Fields; use strict; use warnings; use parent qw(IMPL::Object::Abstract); sub new { my $class = shift; $class = ref $class || $class; my $this = fields::new($class); $this->callCTOR(@_); return $this; } sub surrogate { my $class = shift; $class = ref $class || $class; return fields::new($class); } 1;