A(nother) MOP for Perl 5