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

arrays perl scalar
nebulus picture nebulus · Apr 15, 2011 · Viewed 11.7k times · Source

Here is the code...

use strict;
use warnings;

my @array= (1,2,3,4,5);
my $scalar= 5;

@array= $scalar*@array;

print @array;

Need something that can perform similar function with little code. Thanks!

Answer

RC. picture RC. · Apr 15, 2011

Use foreach. 

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

Related questions

How can I check if a Perl array contains a particular value?

I am trying to figure out a way of checking for the existence of a value in an array without iterating through the array. I am reading a file for a parameter. I have a long list of parameters I …

Read More
Best way to iterate through a Perl array

Which is the best implementation(in terms of speed and memory usage) for iterating through a Perl array? Is there any better way? (@Array need not be retained). Implementation 1 foreach (@Array) { SubRoutine($_); } Implementation 2 while($Element=shift(@Array)) { SubRoutine($Element); } Implementation 3 …

Read More
How do I remove duplicate items from an array in Perl?

I have an array in Perl: my @my_array = ("one","two","three","two","three"); How do I remove the duplicates from the array?

Read More