<HTML><BODY style="word-wrap: break-word; -khtml-nbsp-mode: space; -khtml-line-break: after-white-space; "><BR><DIV><DIV>On 2007/03/30, at 19:15, Eden Cardim wrote:</DIV><DIV><BR class="khtml-block-placeholder"></DIV><BLOCKQUOTE type="cite"><DIV style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; ">Hmm, acho que isto está sujeito a debate. Código também é informação,</DIV><DIV style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; ">apesar de ser executável. Alguém poderia criar uma classe e instanciar</DIV><DIV style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; ">um objeto sem usar informação sobre o objeto, para implementar, por</DIV><DIV style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; ">exemplo, os padrões de projeto Template Method e Strategy. Esses dois</DIV><DIV style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; ">padrões caem nesse caso que você falou, porém o uso deles favorece</DIV><DIV style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; ">bastante a extensibilidade do código.</DIV></BLOCKQUOTE><BR></DIV><DIV>Hrm... Estou lendo agora a repeito do Template Method :-) Concordo com você, mas você tem que lembrar que a maioria das pessoas que escrevem o tipo de código descrito acima não conhecem isto. Pelo que eu entendi, no Template Method todos os métodos não abstratos são geridos pela classe Template, e todos os que herdam da mesma provêm informações para cálculos e operações pelo Template. Eu quis foi exemplificar as classes multifunções utilitárias -facilmente identificadas através do namespace Util :-).</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>Agora sobre o Strategy -lendo :-). Bom, pelo que eu entendi, ele serve prá modificar algorítimos em tempo de execução. Algo do tipo, criar um objeto de compactação e passar o contexto -zip, gz, etc- para modificar o comportamento do sistema. Certo, neste caso é útil também, mas até que ponto o contexto é acoplado na instancia do objeto que utiliza o Strategy pattern?</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>Me corrija se eu estiver errado:</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV><code></DIV><DIV>package Archiver;</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>sub new {</DIV><DIV> my ($class) = @_;</DIV><DIV> my $self = {};</DIV><DIV> bless $self, $class;</DIV><DIV> return $self;</DIV><DIV>}</DIV><DIV><BR class="khtml-block-placeholder"></DIV>sub compress {<DIV> my ($self, $strategy) = @_;</DIV><DIV> $strategy->compress($self);</DIV><DIV> ...</DIV><DIV>}</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>sub add {</DIV><DIV> ...</DIV><DIV>}</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>sub list {</DIV><DIV> ...</DIV><DIV>}</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>package Archiver::Zip;</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>sub new {</DIV><DIV> my ($class) = @_;</DIV><DIV> my $self = {};</DIV><DIV> bless $self, $class;</DIV><DIV> return $self;</DIV><DIV>}</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>sub compress {</DIV><DIV> my ($self, $archiver) = @_;</DIV><DIV> # faz o necessário para comprimir os dados do Archiver</DIV><DIV> my @files = $archiver->list();</DIV><DIV> ...</DIV><DIV>}</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>package main;</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>my $archiver = Archiver->new();</DIV><DIV>$archiver->add('/tmp/somefile.txt');</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>$archiver->compress(Archiver::Zip->new());</DIV><DIV></code></DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>Deixei escapar alguma coisa? :-)</DIV><DIV><BR><DIV> <SPAN class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Lucida Grande; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><DIV>--</DIV><DIV>Igor Sutton</DIV><DIV><A href="mailto:igor.sutton@gmail.com">igor.sutton@gmail.com</A></DIV><DIV><BR class="khtml-block-placeholder"></DIV><BR class="Apple-interchange-newline"></SPAN> </DIV><BR></DIV></BODY></HTML>