<div dir="ltr">Em alguns casos, complexidade é um pouco ponto de vista.<div><br></div><div style>Acho que entendi a abordagem do mantovani, mas pro meu caso específico, acho que é também o overhead, já que eu só valido 4 campos em uma situação eventual. Estou cogitando nem usar o Data::Manager.</div>

<div style><br></div><div style>Se fosse um cazilhao de campos sendo validados constantemente, acho que valeira a pena.</div><div style><br></div><div style>Mantovani, cuidado pra não ficar aparafusando pregos, certo!?</div>

<div style><br></div><div style>[]'s</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2013/9/3 Solli Honorio <span dir="ltr"><<a href="mailto:shonorio@gmail.com" target="_blank">shonorio@gmail.com</a>></span><br>

<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Sério mesmo Mantovani que vc acha que um sistema de fila é a solução para eu validar se todos os campos de um formulário estão dentro do aguardado para trabalhar no  banco de dados ?<div>

<br></div><div>Mantovani, só posso dizer que estou orgulhoso de você... vejo que você terá um excelente futuro na industria de tecnologia (coisa que eu não tive), pois este é bem o comportamento dos vendedores de TI. Você está agregando complexidade numa lugar que estou tentando agregar simplicidade :D !!!</div>



<div><br></div><div>Abraços,</div><div><br></div><div>Solli Honorio</div><div><br></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">Em 3 de setembro de 2013 14:58, Daniel de Oliveira Mantovani <span dir="ltr"><<a href="mailto:daniel.oliveira.mantovani@gmail.com" target="_blank">daniel.oliveira.mantovani@gmail.com</a>></span> escreveu:<div>

<div class="h5"><br>

<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">2013/9/3 Solli Honorio <<a href="mailto:shonorio@gmail.com" target="_blank">shonorio@gmail.com</a>>:<br>
<div>> Lucas,<br>
><br>
> Obrigado pelo retorno. Ontem a noite estudei o código do Data::Manager e ví<br>
> que realmente não rola fazer o que eu estava querendo fazer (passar uma<br>
> pilha de mensagem e receber de acordo com o contexto) e ai estou<br>
> encaminhando para a mesma solução que você.<br>
<br>
" o que eu estava querendo fazer (passar uma pilha de mensagem e<br>
receber de acordo com o contexto)"<br>
<br>
</div>Shonorio, repetindo o AMQP se encaixa perfeitamente. Eu sugiro que<br>
você leia o link que eu te enviei. Se um serviço na sua máquina vai te<br>
poupar centenas de linhas de código, talvez nessa situação, nesse<br>
contexto obscuro no qual não foi definido pelo interlocutor seja uma<br>
boa.<br>
<br>
Se você acha que isso é demais para você, eu sinto muito que alguém<br>
com pelo menos 15/20 anos de experiência ainda não saiba formular uma<br>
pergunta. Perguntas genéricas, respostas genéricas. E ainda acho<br>
extremamente desnecessário o seu ataque gratuito, mas se você ainda<br>
não percebeu isso afasta as pessoas da lista.<br>
<div><div><br>
><br>
> Como vc faz com o I18N ?<br>
><br>
> O Renato Cron publicou um 'template'  ( <a href="https://github.com/AwareTI/MyApp" target="_blank">https://github.com/AwareTI/MyApp</a> )<br>
> de como eles estão utilizando o Data::Manager. Estudei o código e achei<br>
> engenhoso, mas ainda quero manter um melhor controle do ResultSet porquê<br>
> quero devolver uma estrutura mais complexa de informação.<br>
><br>
> Abraços,<br>
><br>
> Solli Honorio<br>
><br>
><br>
><br>
> 2013/9/3 Lucas Oliveira <<a href="mailto:lucasmateus.oliveira@gmail.com" target="_blank">lucasmateus.oliveira@gmail.com</a>><br>
>><br>
>><br>
>> Normalmente eu uso sempre com I18N mas da pra quebrar o galho assim<br>
>><br>
>> <code><br>
>> #!/usr/bin/env perl<br>
>><br>
>> use common::sense;<br>
>> use Data::Manager;<br>
>> use Data::Verifier;<br>
>><br>
>> my %msg_data = (<br>
>>    missing_name_last => 'Nao foi informado o campo name_last, seu idiota<br>
>> !',<br>
>> );<br>
>><br>
>> sub messages { $msg_data{$_[0]} || $_[0] }<br>
>><br>
>> my $dm = Data::Manager->new;<br>
>> my $dv = Data::Verifier->new(<br>
>>     filters => [ qw(trim) ],<br>
>>         profile => {<br>
>>             name_first => {<br>
>>                 required => 1,<br>
>>                 type     => 'Str',<br>
>>                 filters  => [ qw(collapse) ]<br>
>>             },<br>
>>             name_last => {<br>
>>                 required => 1,<br>
>>                 type     => 'Str',<br>
>>                 filters  => [ qw(collapse) ]<br>
>>             },<br>
>>             age  => {<br>
>>                 type        => 'Int'<br>
>>             },<br>
>>             sign => {<br>
>>                 required    => 1,<br>
>>                 type        => 'Str'<br>
>>             }<br>
>>         }<br>
>>     );<br>
>><br>
>> $dm->set_verifier( name => $dv );<br>
>> $dm->verify( name => { name_first => 'Solli' });<br>
>><br>
>> if (!$dm->success) {<br>
>>    print &messages( $_->msgid ).$/<br>
>>       foreach (@{ $dm->messages->messages });<br>
>> }<br>
>> </code><br>
>><br>
>><br>
>> Em 02/09/2013, às 11:10, Solli Honorio <<a href="mailto:shonorio@gmail.com" target="_blank">shonorio@gmail.com</a>> escreveu:<br>
>><br>
>> Pessoal,<br>
>><br>
>> Estou tentando configurar uma mensagem padronização no Data::Manager, mas<br>
>> não está funcionando. Alguém aqui já utilizou o Data::Manager para saber se<br>
>> é possível fazer isto que eu quero ?<br>
>><br>
>> O código abaixo, estou criando uma mensagem e adicionando no Data::Manger,<br>
>> porquê eu imaginei que quando ocorrer o problema dentro do escopo e msgid,<br>
>> eu teria o texto padronizado, mas o que estou recebendo é mais uma pilha de<br>
>> mensagem, mesmo quando não existe o erro.<br>
>><br>
>> <code><br>
>> #!/usr/bin/env perl<br>
>> use common::sense;<br>
>> use Data::Manager;<br>
>> use Data::Verifier;<br>
>> use Data::Printer;<br>
>><br>
>> my $msg = Message::Stack->new;<br>
>> $msg->add({<br>
>>     msgid   => 'missing_name_last',<br>
>>     level   => 'error',<br>
>>     scope   => 'name1',<br>
>>     subject => 'name_last',<br>
>>     text    => 'Não foi informado o campo name_last, seu idiota !'} );<br>
>><br>
>> my $dm = Data::Manager->new( { messages => $msg } );<br>
>> my $dv = Data::Verifier->new(<br>
>>     filters => [ qw(trim) ],<br>
>>         profile => {<br>
>>             name => {<br>
>>                 required => 1,<br>
>>                 type     => 'Str',<br>
>>                 filters  => [ qw(collapse) ]<br>
>>             },<br>
>>             age  => {<br>
>>                 type        => 'Int'<br>
>>             },<br>
>>             sign => {<br>
>>                 required    => 1,<br>
>>                 type        => 'Str'<br>
>>             }<br>
>>         }<br>
>>     );<br>
>><br>
>><br>
>> };<br>
>><br>
>><br>
>> $dm->set_verifier('name1', $verifier);<br>
>> $dm->verify('name1', { name_last => 'Honorio', name_first => 'Solli' });<br>
>><br>
>> my $results = $dm->get_results('name1');<br>
>> my $stack   = $dm->messages_for_scope('name1');<br>
>><br>
>> say $results->success;<br>
>><br>
>> say "Is invalid name_first ", $results->is_invalid('name_first');<br>
>> say "Is invalid name_last ",  $results->is_invalid('name_last');  # yes<br>
>><br>
>> say "Is missing name_first ", $results->is_missing('name_first'); # no<br>
>> say "Is missing is_missing ", $results->is_missing('name_last'); # yes<br>
>><br>
>> say "Missing count ", $results->missing_count;<br>
>><br>
>> say "Count : ",  $stack->count ;<br>
>> p $stack->get_message( 0 );<br>
>> p $stack->get_message( 1 );<br>
>><br>
>> </code><br>
>><br>
>><br>
>> --<br>
>> "o animal satisfeito dorme". - Guimarães Rosa<br>
>> =begin disclaimer<br>
>>   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
>> SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
>> L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
>> =end disclaimer<br>
>><br>
>><br>
>><br>
>> =begin disclaimer<br>
>>    Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
>>  SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
>>  L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
>> =end disclaimer<br>
>><br>
><br>
><br>
><br>
> --<br>
> "o animal satisfeito dorme". - Guimarães Rosa<br>
><br>
> =begin disclaimer<br>
>    Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
>  SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
>  L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
> =end disclaimer<br>
><br>
<br>
<br>
<br>
--<br>
<br>
</div></div><div>-dom<br>
<br>
--<br>
<br>
Daniel de Oliveira Mantovani<br>
Business Analytic Specialist<br>
Perl Evangelist /Astrophysics hobbyist.<br>
<a href="tel:%2B55%2011%209%208538-9897" value="+5511985389897" target="_blank">+55 11 9 8538-9897</a><br>
XOXO<br>
</div><div><div>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
</div></div></blockquote></div></div></div><div><div class="h5"><br><br clear="all"><div><br></div>-- <br>"o animal satisfeito dorme". - Guimarães Rosa
</div></div></div>
<br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br></div>