>>>>> "Tiago" == Tiago Peczenyj <[email protected]> writes:

    Tiago> Humm... analisando o seu problema parece que o primeiro passo é
    Tiago> criar um repositorio que sabe "criar" os seus objetos. Vejo um
    Tiago> problema que é saber se o objeto esta inativo ou não, vc teria que
    Tiago> trabalhar com o destrutor.

Ou você pode desativar o objeto quando ele sair do escopo, via
https://metacpan.org/module/Scope::Guard

my $foo = $container->resolve(service => 'foo');
my $guard = guard { $foo->active(0) };

Mas não vejo muito sentido em ter clones de objetos "ativos" ou "inativos" se
eles são singleton.

-- 
      Eden Cardim         Need help with your Catalyst or DBIx::Class project?
      Code Monkey                 http://www.shadowcat.co.uk/catalyst/
 Shadowcat Systems Ltd.    Want a managed development or deployment platform?
 http://edencardim.com            http://www.shadowcat.co.uk/servers/
=begin disclaimer
   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
 SaoPaulo-pm mailing list: [email protected]
 L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer

Responder a