http://www.perlmonks.org?node_id=297547


in reply to How do YOU do OO in Perl?

<xmp>
I exclusivly use Class::Maker, because i wrote it. I exclusivly write robust, deluxe, fancy, feature-rich, badly-documented stuff ;)

Newly i use it in combination with Data::Type:

class 'Idiot', { public => { string => [ qw( name title ) ], int => [ qw( score ) ], }, types => { string => STD::VARCHAR(80), int => STD::INTEGER, } }; my $murat = new Idiot name => 'murat', title => 'Mr.', score => 10; # + out of 10
</xmp>

Murat

Edit by tye, preserve formatting