┌─[tadzik@yavin4]─[~]
└─[%]─> cat foo.pl
use feature 'say';

package Foo {
    use Moo;
    has 'a', is => 'ro';
}

package Bar {
    use Moo;
    has 'b', is => 'ro';
}

say Foo->new(a => 7)->a;
say Bar->new(b => 3)->b;
┌─[tadzik@yavin4]─[~]
└─[%]─> time perl foo.pl
7
3
perl foo.pl  0.05s user 0.00s system 95% cpu 0.054 total