# [234] of a kind
$score += [*]($_,$_-1) for %cardvals.values;