ah sim! tem o columns! eu tentei lembro nome dele na pressa, mas não lembrava!<div><br><div><a href="http://search.cpan.org/~frew/DBIx-Class-0.08198/lib/DBIx/Class/ResultSet.pm#columns">http://search.cpan.org/~frew/DBIx-Class-0.08198/lib/DBIx/Class/ResultSet.pm#columns</a></div>
<div><dl style="font-family:arial,sans-serif;background-color:rgb(255,255,255)"><dt style="margin-top:1em"><a name="Value:_\@columns">Value: \@columns</a></dt></dl><p style="font-family:arial,sans-serif;background-color:rgb(255,255,255)">
Shortcut to request a particular set of columns to be retrieved. Each column spec may be a string (a table column name), or a hash (in which case the key is the <code>as</code> value, and the value is used as the <code>select</code> expression). Adds <code>me.</code> onto the start of any column without a <code>.</code> in it and sets <code>select</code> from that, then auto-populates <code>as</code> from <code>select</code> as normal. (You may also use the <code>cols</code> attribute, as in earlier versions of DBIC.)</p>
<p style="font-family:arial,sans-serif;background-color:rgb(255,255,255)">Essentially <code>columns</code> does the same as <a href="http://search.cpan.org/~frew/DBIx-Class-0.08198/lib/DBIx/Class/ResultSet.pm#select" class="podlinkpod" style="background-color:transparent;color:rgb(0,102,153)">"select"</a> and <a href="http://search.cpan.org/~frew/DBIx-Class-0.08198/lib/DBIx/Class/ResultSet.pm#as" class="podlinkpod" style="background-color:transparent;color:rgb(0,102,153)">"as"</a>.</p>
-- só pra ficar documentado!</div><div><br><div class="gmail_quote">2012/8/20 Jose Nilton <span dir="ltr"><<a href="mailto:jniltinho@gmail.com" target="_blank">jniltinho@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Esse modo funcionou:<br><br> my $rs = $c->model('Users')->search({adm => 2}, {columns => [qw/ id name email adm active /]});<div class="im"><br> $rs->result_class('DBIx::Class::ResultClass::HashRefInflator');<br>
<br><br></div> Assim retorno só algumas colunas em json na View.<br><br>Obrigado a todos<br><br><br><div class="gmail_quote">Em 20 de agosto de 2012 10:41, Eden Cardim <span dir="ltr"><<a href="mailto:eden@insoli.de" target="_blank">eden@insoli.de</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">>>>>> "Nelson" == Nelson Ferraz <<a href="mailto:nferraz@gmail.com" target="_blank">nferraz@gmail.com</a>> writes:<br>
<br>
Nelson> Eu sei que a pergunta foi para o Catalyst, mas não custa mostrar como<br>
Nelson> se faz em outros frameworks...<br>
<br>
Nelson> my @all = $schema->resultset('Users')->all;<br>
<br>
Na verdade, isso não funciona. Teria que ser:<br>
<div><br>
my @all = $schema->resultset('Users')<br>
</div> ->search_rs({},<br>
{ result_class 'DBIx::Class::ResultClass::HashRefInflator' })->all;<br>
<br>
Senão a saída vai ser parecida com isso:<br>
<br>
["MyApp::Schema::Result::User=HASH(0x7fbe8c0b2210)","MyApp::Schema::Result::User=HASH(0x7fbe8c0c1480)","MyApp::Schema::Result::User=HASH(0x7fbe8c0c1438)","MyApp::Schema::Result::User=HASH(0x7fbe8c022360)"]<br>
<br>
E esse é justamente o problema do OP, como extrair a estrutura correta<br>
dos objetos, e isso independe do framework web.<br>
<br>
O código correto, com Mojolicious::Lite:<br>
<div><br>
my $self = shift;<br>
my @all = $schema->resultset('Users')<br>
</div> ->search_rs({}, { result_class 'DBIx::Class::ResultClass::HashRefInflator' })->all;<br>
<div> $self->render( json => \@all );<br>
<br>
</div>O código correto, com Catalyst:<br>
<br>
my $c = shift;<br>
@{$c->stash->{rows}} = $c->model('DB::Users')<br>
->search_rs({}, { result_class 'DBIx::Class::ResultClass::HashRefInflator' })->all;<br>
<div> $c->forward('View::JSON');<br>
<br>
</div><span><font color="#888888">--<br>
Eden Cardim Software sob medida<br>
<a href="tel:%2B55%2011%209644%208225" value="+551196448225" target="_blank">+55 11 9644 8225</a> Gestão de projetos de software<br>
<a href="mailto:edenc@insoli.de" target="_blank">edenc@insoli.de</a> Gestão de servidores e bancos de dados<br>
Treinamento em soluções Open Source<br>
Insolide<br>
Soluções de TI Ltda. Converse conosco a respeito de como nossas<br>
<a href="http://insoli.de" target="_blank">http://insoli.de</a> soluções podem ajudar o seu projeto ou empresa<br>
</font></span><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><br><br clear="all"><div class="HOEnZb"><div class="h5"><br>-- <br>.................................................................<br> "Com Deus todas as coisas são possíveis"<br>
</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><br clear="all"><div><br></div>-- <br><div><span style="color:rgb(51,51,51);font-size:x-small">Saravá,</span></div><div><span style="color:rgb(51,51,51);font-size:x-small">Renato CRON</span></div>
<div><div style="text-align:right"><font size="1" color="#333333"><a href="http://www.renatocron.com/blog/" target="_blank">http://www.renatocron.com/blog/</a></font></div></div><div style="text-align:right"><font size="1" color="#333333"><a href="http://twitter.com/#!/renato_cron" target="_blank">@renato_cron</a></font></div>
<br>
</div></div>