Select Code to Download

@res = map { $_ - shift(@arr2) } @arr1;

my $i = 0;
@res = map { $_ - $arr2[$i++] } @arr1;