Help for this page

Select Code to Download

Select or download this

use List::MoreUtils qw(:all);

...

@multi=pairwise{$a*=$b} @one,@two;
print "\n@multi\n";

Select or download this
```
12 6 12 35 20 700
```