Perhaps what you need is a dispatch table.

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

Then have a sub for each possible condition.