- sub (/st/:contest) { response st => 'Standings', standings($_{contest}), 10 },
+ sub (/st/:contest) {
+ my @pb = map { [$_->{id}, $_->{name}] } @{problem_list contest => $_{contest}};
+ response st => 'Standings', {problems => \@pb, st => standings $_{contest}}, 10
+ },