t/lib/NotHashBased.pm

   1 package NotHashBased;
   2 use strict;
   3 use warnings;
   4 use base 'Class::Accessor::Grouped';
   5
   6 sub new {
   7     return bless [], shift;
   8 };
   9
  10 __PACKAGE__->mk_group_accessors('inherited', 'killme');
  11
  12 1;