SOLVED. I did a query in Perl:
<code>
$sth=$dbh->prepare(qq{select distinct(genre),id from cds group by genre order by genre});
print qq{[$id]\t-->$genre<--\n>};
</code>
and discovered 1 entry had several trailing spaces. Once they were deleted, all was good.