Re^2: Introspection of Moose/Mouse attributes fails to find native trait with `does`

I agree. And there is type_constraint() method to get Moose::Meta::TypeConstraint object for the attribute:

print "Attribute does Bool? ", $attr->type_constraint->equals("Bool") 
+? "Yes!" : "No...", $/;
[download]

It works well as expected.

Comment on Re^2: Introspection of Moose/Mouse attributes fails to find native trait with `does` Download Code