Esse modo funcionou:<br><br>    my $rs = $c->model('Users')->search({adm => 2}, {columns => [qw/ id name email  adm active /]});<br>    $rs->result_class('DBIx::Class::ResultClass::HashRefInflator');<br>
<br><br> 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:<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">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 class="im"><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 class="im"><br>
    my $self = shift;<br>
    my @all = $schema->resultset('Users')<br>
</div>     ->search_rs({}, { result_class 'DBIx::Class::ResultClass::HashRefInflator' })->all;<br>
<div class="im">    $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 class="im HOEnZb">    $c->forward('View::JSON');<br>
<br>
</div><span class="HOEnZb"><font color="#888888">--<br>
Eden Cardim                        Software sob medida<br>
<a href="tel:%2B55%2011%209644%208225" value="+551196448225">+55 11 9644 8225</a>              Gestão de projetos de software<br>
<a href="mailto:edenc@insoli.de">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 class="HOEnZb"><div class="h5">=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>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>.................................................................<br>  "Com Deus todas as coisas são possíveis"<br>