#!/usr/bin/perl -w
use Data::Dumper;
use strict;
use Models;

print STDERR Dumper [ map{ { $_->get_columns } } Models->resultset('Translation')->search({ language_id => 'zhCN'})->all() ];