@values=([some,things] , [1,2,3,4,5,6]); (a,b,c,d)=CalcMinAvgMaxSum(\@{${$values}[1]}[$start..$end]); sub CalcMinAvgMaxSum() { $ArrayOfValues_REF=@_; for $val (@{$ArrayOfValues_REF}) { ...do some stuff } } #### for $val (@{ArrayOfValues_REF})