}
say "<li><strong>$_</strong></li>" for Entity($row->{form});
my $children = $db->select(word => '*', {cat => $row->{id}, ref => undef}, 'grade, id');
while (my $ref = $children->hash) {
}
say "<li><strong>$_</strong></li>" for Entity($row->{form});
my $children = $db->select(word => '*', {cat => $row->{id}, ref => undef}, 'grade, id');
while (my $ref = $children->hash) {