![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to createtable.pl CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Local Repository] / processmail|
Return to createtable.pl CVS log | Up to [Local Repository] / processmail |
| version 3.1, 2008/03/24 16:01:47 | version 3.2, 2008/09/08 17:16:47 |
|---|---|
| Line 64 for (my $r=1; $r<=$ROUNDS; $r++) { | Line 64 for (my $r=1; $r<=$ROUNDS; $r++) { |
| } | } |
| # | # |
| # Удаляем старые рейтинги (Ivan A Derzhanski <iad58@mail.ru>) | |
| # | |
| for ($i=1;$i<=$MAXQUEST;$i++) { | |
| foreach $answer (keys %{$answers[$i]}) { | |
| %{$answers[$i]->{$answer}->{teams}} = (); | |
| } | |
| } | |
| # | |
| # Читаем ответы в данном раунде | # Читаем ответы в данном раунде |
| # | # |
| foreach my $file ( @{$FILES[$r]} ) { | foreach my $file ( @{$FILES[$r]} ) { |