perl -I ~/lib/ -MCC2::Schema::BirthdayCardList -MClass::ISA -le 'for (Class::ISA::super_path( "CC2::Schema::BirthdayCardList" )) { print "\$_ is : $_"; print "I have the method, add_to_birthday_cards\n" if $_->can("add_to_birthday_cards") }'