my %obj_cache;

override 'new' => sub {
    my ( $class, @args ) = @_;
    my $params = $class->BUILDARGS(@args);
    $obj_cache{$params->{thingy}} ||= $class->_new($params);
};

##</code><code>##

sub instance { shift->new(@_) }