Select Code to Download

sub map_With_Ref { # kvale ...
    my( $sub )= shift( @_ );
...
# "Map-twice" should have been called here ****
map_pass_as_Param( \&addten_array,   \@a, \@b, \@c );
map_pass_as_Param( sub { print "@_\n" }, \@a, \@b, \@c );

--- OUTPUT----
--- REF test --
...
41
44
47