Select Code to Download

package MyCow;
use Moose;
...

my $attr = $cow->meta->get_attribute('Bool');
print "Attribute does Boolean? ", $cow->guernsey ? "Yes!" : "No...", $
+/;