{ my %is_internal_type = map { $_ => 1 } qw( ARRAY HASH SCALAR GLOB CODE ); sub isa { my $self = shift; my ($type) = @_; return if $is_internal_type{$type}; return $self->SUPER::isa($type); } }