![]() ![]() | ![]() |
version 3.0, 2008/03/23 17:50:50 | version 3.1, 2008/03/24 16:01:47 |
---|---|
Line 41 else | Line 41 else |
} | } |
readmail(\%teams); | readmail(\%teams); |
close(INFILE); | close(INFILE); |
# | # |
# Пишем мейл | # Пишем мейл |
# | # |
Line 62 foreach $team (keys %teams) | Line 63 foreach $team (keys %teams) |
&printfooter; | &printfooter; |
# | |
# На всякий случай проверяем на наличие команд с дублирующимися номерами. | |
# | |
check_dup_numbers(\%teams); |