package Foo::Role; sub foo { print "foo\n"; }