if $obj.^can($method_name) {...

Am 20.03.2015 um 19:38 schrieb Tom Browder:
> I am trying to create a testing subroutine to detect if a class object
> has a certain method.
>
> I want it to look something like this:
>
>   my $obj = Foo.new();
>   can_ok($obj, 'method1');
>
>   sub can_ok($obj, Str $method_name) {
>     if $obj.{$method_name}:exists {
>       say "ok";
>       return True;
>     }
>     else {
>       say "not ok";
>      return False;
>     }
>   }
>
> A similar function can detect valid attributes, but this or variants
> I've tried don't.
>
> How can I test for the existence of a method?
>
> Thanks.
>
> Cheers!
>
> -Tom

Reply via email to