Select Code to Download

BEGIN { our @ISA = qw(Pixie::Object); }

                # Do something more extreme?
                my @attributes = eval "attributes::get(\\\&$class\::$k
+ey)";
...
                warn "$class already has a method $key; this will be u
+sed instead of field access." .
                      " Attach attribute override to that method if yo
+u would like to suppress this message."
                      unless grep(/^override/,@attributes);