isa for ref?

LanX has asked for the wisdom of the Perl Monks concerning the following question:

  DB<71> $code = sub {}

  DB<72> p ref $code
CODE
  DB<73> *isa = \&UNIVERSAL::isa    # import

  DB<74> p isa($code,"CODE")        # ??? 
1
  DB<75>
[download]

Where is this behavior of isa() documented and why would one want to do this?

Cheers Rolf
_{(addicted to the Perl Programming Language :)

Wikisyntax for the Monastery}

Comment on isa for ref? Download Code

Replies are listed 'Best First'.
Re: isa for ref? by tobyink (Canon) on Jun 20, 2020 at 22:14 UTC
It's documented towards the end of UNIVERSAL. And you don't want to do it. `isa` is a method, not a function. toby döt ink	[reply] [d/l]
Re^2: isa for ref? by haj (Vicar) on Jun 21, 2020 at 12:49 UTC
`isa` is a method, not a function. SCNR: Unless you're running Perl 5.32, where `isa` is an infix operator.	[reply]
Re: isa for ref? by choroba (Cardinal) on Jun 20, 2020 at 22:14 UTC
> why would one want to do this Maybe because of `my $ref = bless sub {}, 'MyClass'; say ref($ref) eq 'CODE' ? 1 : 0; say UNIVERSAL::isa($ref, 'CODE') ? 1 : 0;` [download] `map{substr$_->[0],$_->[1]\|\|0,1}[\\|\|{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^ARGV,3]`	[reply] [d/l] [select]
Re^2: isa for ref? by LanX (Saint) on Jun 20, 2020 at 22:39 UTC
yeah, but that's why we have `Scalar::Util::reftype()` now Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery}	[reply] [d/l]