Select Code to Download

sub _mk_column_accessors {
    my $class = shift;
...
        };
    }
} #_mk_column_accessors

sub _mk_column_accessors {
    my $class = shift;
...
     foreach grep {!exists &{$class."::$_"}} @_;
    $class->SUPER::_mk_column_accessors( @_ );
} #_mk_column_accessors