Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Общие вопросы > Abstract Factory

Автор: SkoobyDoo 5.7.2011, 13:54

Доброго времени суток!
Уважаемые Perlовики не могли бы доступным языком (Perl) объяснить на примере, паттерн Abstract Factory и может дадите ссылки на cpan-модули где можно увидеть, как оно работает. Сам я только видел примеры на других языках, но понять их не могу.

Автор: KSURi 5.7.2011, 13:57

http://perldesignpatterns.com/?AbstractFactory

Автор: afiskon 5.7.2011, 13:57

Код


package Client;
use RealClient;
use DummyClient;

sub new {
  if(%ENV{TESTING}) {
    return DummyClient->new();
  } else {
    return RealClient->new();
  }
}

1;

Автор: vivu 9.7.2011, 22:00

http://pintograss.blogspot.com/2010/11/1.html