Select Code to Download

BEGIN {
    package MyCow;
...

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