{
    package Named;
    use Moose::Role;

    has 'name', is => 'ro', isa => 'Str';
}

{
    package Aged;
    use Moose::Role;

    has 'age', is => 'ro', isa => 'Int';
}

{
    package FooBar;
    use Moose;

    with qw( Named Aged );
}