The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;
use Test::More;

do {
    package My::Meta::Role;
    use Moose;
    BEGIN { extends 'Moose::Meta::Role' };
};

do {
    package My::Role;
    use Moose::Role -metaclass => 'My::Meta::Role';
};

is(My::Role->meta->meta->name, 'My::Meta::Role');

done_testing;