How can I create an array that holds number of variables with values?

[Anonymous Monk]

Simple question:
I need to initialize 20 variables($var1..$var20) to zero.

$var1=0;
$var2=0;
$var3=0;
...

How do I do this with arrays in Perl?

Thanks...Mike

[runrig]

my @array = map {0} 0..19;

[I0]

my @array = (0)x20;

[Russ]

Your question almost answers itself

my @var = (43, 60, 1..18);
# Later...
print $var[1], $var[14];

Use an array instead of multiple, distinct variables.

turnstep is right, you don't have to initialize all the variables to zero, just create them where you need them, giving a value at that time.

runrig's code (my @array = map {0} 0..19) works fine here, as well.

[turnstep]

Also keep in mind that you may not need to initialize them at all - perl can usually figure out what you want to do. For example

my $var1;
$var1++;
print "Var1 is now $var1\n";

my $var2;
$var2 = "Foobar";
print "Var2 is now $var2\n";

Both of the above will work fine. The values start out undefined, and in most cases (but not all) they do not need an explicit initialization.

[I0]

 ${"var$_"}=0 for(1..20);
#but why aren't you using @var[1..20] ?

Originally posted as a Categorized Answer.

[runrig]

Or do you mean:

my @array = \my ($var1, $var2, $var3);
$$_ = 0 for @array;

Originally posted as a Categorized Answer.

[Anonymous Monk]

let me put it in that way: I want to use these variables later in my program rather initializing like this: $var1=0; $var2=0; $var3=0; How can I define an array, so that I can use these variables to assign them later something else ? (i.e: $var1= 43; $var2 = 60; etc...

Originally posted as a Categorized Answer.