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>