I'm suprised no one in the previous thread mentioned can. I can't find an entry for it in the perldoc, Will something like this work?

foreach my $meth(@required_methods) {
  unless($obj->can($meth)) {
     die "Object has not implemented or inhereted method $meth!\n";
  }
}
[download]

can walks @ISA as well, AFAIK.
Update: Will this only work at runtime, and not compile time?