You didn't give us enough information. The code you gave us is far from complete (we don't see where half the variables come from), and you didn't provide a data sample. See How do I post a question effectively?.

Unless you're writing in Perl 6, which you probably aren't, you should write $src[$i] instead of @src[$i]. $ is for single values (scalars), and @ for multiple values (lists or arrays), so when you get the single value $i out of @array, it's $array[$i].

Reading a bit of documentation would be a good idea, and perlintro a good place to start.