135                # new record is the highest
136            print "Begin: i=[$i], cur[2]=[",$cur[2],"], win[2]=[", $win[2], "]", "\n";
137            if ($cur[2] > $win[2]) {
138                $top2{$key1}{$key2} = [$votes_office_ttl,@cur,@win];
139            }
140            elsif (0+$cur[2] > 0+$sec[2]) {
141                $top2{$key1}{$key2} = [$votes_office_ttl,@win,@cur];
142            };
143            print "End: i=[$i], cur[2]=[",$cur[2],"], win[2]=[", $win[2], "]", "\n";