for my $score (sort { &{ $dispatch{$condition} } } keys %scores){
...