This sounds a lot like a homework project, so I'm not going to write the entire thing. but it sounds like when you call your subroutine, you need to pass it references to your arrays:

my @one = (1,2,3,4);
my @two = (6,7,8,9);

&adder(\@one,\@two);
[download]