my @subs = eval "$class->meta->get_method_list";
for my $c (@subs){
my $attr = eval "$class->meta->get_method('$c')->attributes";
my @subs = eval "$class->meta->get_method_list";
for my $c (@subs){
my $attr = eval "$class->meta->get_method('$c')->attributes";