Select Code to Download

$ perl -le'
   { package Role; use Moose::Role; sub m {} }
...
   print stash_name( Class->new->can("m") );
'
Role