package BasicRole; use Moo::Role; requires qw(abra cadabra); 1; package App; use Moo; with 'BasicRole'; sub abra { 'abra' } sub cadabra { 'cadabra' } 1; package main; use strict; use Data::Dump 'dd'; my $app = App->new(); dd $Role::Tiny::INFO{BasicRole}{requires}; __END__ Output: ["abra", "cadabra"]