I hate to use array indices, but here's one way:

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

This assumes that the arrays @Arr1 and @Arr2 exist and are the same length.