elsif (($cur[2]) > ($sec[2] ? $sec[2] : 0)) {

##</code><code>##

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";

##</code><code>##

Begin: i=[32], cur[2]=[20], win[2]=[100]
Argument "" isn't numeric in addition (+) at ./x.pl line 137, <$fhin> line 32.
End: i=[32], cur[2]=[20], win[2]=[100]