How do I multiply each member of array by a scalar in perl? How do I multiply each member of array by a scalar in perl? arrays arrays

How do I multiply each member of array by a scalar in perl?


Use foreach.

foreach my $x (@array) { $x = $x * $scalar; }


You can try this:

@array = map { $_ * $scalar } @array;

or more simply:

map { $_ *= $scalar } @array;


Howabout this:

foreach(@array){ $_ *= $scalar }

As you see, you can modify the array in-place as it's traversed.