| Name : perl-Object-Tiny
| |
| Version : 1.08
| Vendor : obs://build_opensuse_org/devel:languages:perl
|
| Release : 3.1
| Date : 2015-11-20 20:17:11
|
| Group : Development/Libraries/Perl
| Source RPM : perl-Object-Tiny-1.08-3.1.src.rpm
|
| Size : 0.04 MB
| |
| Packager : (none)
| |
| Summary : Class building as simple as it gets
|
Description :
There\'s a whole bunch of class builders out there. In fact, creating a
class builder seems to be something of a rite of passage (this is my fifth,
at least).
Unfortunately, most of the time I want a class builder I\'m in a hurry and
sketching out lots of fairly simple data classes with fairly simple
structure, mostly just read-only accessors, and that\'s about it.
Often this is for code that won\'t end up on CPAN, so adding a small
dependency doesn\'t matter much. I just want to be able to define these
classes FAST.
By which I mean LESS typing than writing them by hand, not more. And I
don\'t need all those weird complex features that bloat out the code and
take over the whole way I build modules.
And so, I present yet another member of the Tiny family of modules,
Object::Tiny.
The goal here is really just to save me some typing. There\'s others that
could do the job just fine, but I want something that does as little as
possible and creates code the same way I\'d have written it by hand anyway.
To use Object::Tiny, just call it with a list of accessors to be created.
use Object::Tiny \'foo\', \'bar\';
For a large list, I lay it out like this...
use Object::Tiny qw{
item_font_face
item_font_color
item_font_size
item_text_content
item_display_time
seperator_font_face
seperator_font_color
seperator_font_size
seperator_text_content
};
This will create a bunch of simple accessors, and set the inheritance to be
the child of Object::Tiny.
Object::Tiny is empty other than a basic \'new\' constructor which does the
following
sub new {
my $class = shift;
return bless { AATT_ }, $class;
}
In fact, if doing the following in your class gets annoying...
sub new {
my $class = shift;
my $self = $class->SUPER::new( AATT_ );
...
return $self;
}
... then feel free to ditch the SUPER call and just create the hash
yourself! It\'s not going to make a lick of different and there\'s nothing
magic going on under the covers you might break.
And that\'s really all there is to it. Let a million simple data classes
bloom. Features? We don\'t need no stinking features.
|
RPM found in directory: /packages/linux-pbone/ftp5.gwdg.de/pub/opensuse/repositories/devel:/languages:/perl/SLE_11_SP4/noarch |
Hmm ... It's impossible ;-) This RPM doesn't exist on any FTP server
Provides :
perl(Foo_Bar_Accessor)
perl(Foo_Bar_Accessor2)
perl(Foo_Bar_Tiny)
perl(Foo_Bar_Tiny2)
perl(Object::Tiny)
perl-Object-Tiny
Requires :
