Copying an array 1

[gepop]

Hi to all, i just would copy the first n elements of an array into another. I initialize the first in a for loop, but when i go out of the loop it disappear. For what reason?

i tried so many manners, but i didn't get it. Do you have any idea?

 

[ishnid]

It's probably a problem with scope. Hard to know without seeing your code.

To copy first 4 (for example) elements from one array to another:

@second = @first[0..3];

 

[gepop]

$num_pag=<STDIN>;

for ($i=0;$i<$num_pag*3;$i++)
{
@rif=int(rand $num_pag*2) +1;
}

@array2=@rif[0..3];
print @array2 ,"  \n";

this is the code.

 

[KevinADC]

probably should be:

$num_pag=<STDIN>;

for ($i=0;$i<$num_pag*3;$i++)
{
push @rif, int(rand $num_pag*2) +1;
}

@array2=@rif[0..3];
print @array2 ,"  \n";

Otherwise @rif will be a one element array after the loop is finished becaue you are using the assignment operator "=" to redefine the array entirely with each iteration of the "for" loop instead of using "push" to add to the array.

***Insert "strict" and "warnings" and proper variable declaration message here.***

------------------------------------------
- Kevin, perl coder unexceptional!

 

[max1x]

chomp ($num_pag=<STDIN>);

 

[PaulTEG]

what's the problem ...

Paul
------------------------------------
Spend an hour a week on CPAN, helps cure all known programming ailments ;-)

 

[gepop]

thank you!