UNIVERSAL::moniker gives you a string that can be used as a Perl identifier to represent a class. So it does things like convert
Animal::Horse->moniker # horse Animal::Black_Sheep->moniker # blacksheep
<sheepish> s/blacksheep/black_sheep/ </sheepish>
d.