http://qs321.pair.com?node_id=800571


in reply to Re: Perl for hobbyists
in thread Perl for hobbyists

I play badminton and have a Perl/Tk application that we use to generate random doubles teams for club nights. The application tracks the people present, the number of times each has played and the games that have been drawn already. A draw is generated for each 15 minute round. After a draw is generated players can be moved between games or swapped with an undrawn player to even teams up or provide teacher/student pairings etc.

The drawing process doesn't take player rankings into account or any other player attributes. It simply tries to give everyone about the same amount of court time. To that end it works very well and the club is well pleased with it despite a few rough edges.


True laziness is hard work