use Moops; class Example :ro { has name => (reader => 'getName'); has score => (reader => 'getScore'); } my $eg = Example->new(name => "Bob", score => 9.9); say $eg->getName; say $eg->getScore;