my @Products = map {$Arr1[$_] * $Arr2[$_]} 0..$#Arr1;