package # do not index it
        B::OBJECT;

use strict;

sub save { }

# B misses that
sub name { "" }

#B::C::add_to_isa_cache( 'B::OBJECT::can' => 'UNIVERSAL' );
$B::C::isa_cache{'B::OBJECT::can'} = 'UNIVERSAL';

1;