print join(', ', sort { $a <=> $b } @guesses), "\n";