Skip to content

Instantly share code, notes, and snippets.

@autarch
Last active December 31, 2015 23:05
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save autarch/621000c8753028e9fddd to your computer and use it in GitHub Desktop.
Save autarch/621000c8753028e9fddd to your computer and use it in GitHub Desktop.
use v6;
use File::Find;
use Config::INI;
sub find-classes {
my @classes = gather {
my @inspect = GLOBAL::.values;
while @inspect.shift -> $c {
take $c if $c.WHAT ~~ Metamodel::ClassHOW;
@inspect.append( $c.WHO.values.list );
}
};
return @classes;
}
dd find-classes();
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment