%hash{@array} >>++ #### %hash{$_}++ for @array #### @added = @array1 >>+<< @array2; #### ## p5 code, I'm not completely fluent in p6 yet... for ( my $i = 0; i < $#array1; i++ ) { $added[ $i ] = $array1[ $i ] + $array2[ $i ] }
## %hash{$_}++ for @array ##
## @added = @array1 >>+<< @array2; ##
## ## p5 code, I'm not completely fluent in p6 yet... for ( my $i = 0; i < $#array1; i++ ) { $added[ $i ] = $array1[ $i ] + $array2[ $i ] }