Boa tarde a todos, como eu fazer para transformar o resultado do Banco para JSON.
Isso no framework Catalyst Tentei isso: http://www.gossamer-threads.com/lists/catalyst/users/22974 http://search.cpan.org/~frew/DBIx-Class-0.08198/lib/DBIx/Class/ResultClass/HashRefInflator.pm Mas não consegui print em JSON. Segue o codigo: * sub dados :Local { my ( $self, $c ) = @_; # seleciona todos os dados da tabela pessoa my $rs = $c->model('DB::Log')->resultset('Users')->all; $rs->result_class('DBIx::Class::ResultClass::HashRefInflator'); $c->stash->{books} = [ $rs->all ]; # invocar a view JSON $c->forward('View::JSON'); }* Erro: Can't call method "result_class" without a package or object reference at Controller/Dados.pm line 35." -- ................................................................. "Com Deus todas as coisas são possíveis"
=begin disclaimer Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ SaoPaulo-pm mailing list: [email protected] L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> =end disclaimer
