Aristotle Pagaltzis wrote: > sub _isa { > my ( $val, $class ) = @_; > UNIVERSAL::can( $val, 'can' ) Did you mean ------------------>'isa' > ? $val->isa( $class ) > : $class eq ref $val; > } John