gistfile1.txt

package Role1;
use Moose::Role;

has attr => ( is => 'ro' );

package Role2;
use Moose::Role;

with 'Role1';

has '+attr' => ( isa => 'Int' );

package FooBar;
use Moose;

with 'Role2';

pacakge main;


FooBar->new();