sub post_require { 
    my ($self, $class) = shift;
    my $factory_class=ref $self;
    no strict 'refs';
    *{"$class::factory"} = sub { return $factory_class->instance; };
}