Program below works fine but I wander how to optimize this; it looks very
ugly. The final result have to be @data which contains two arrays. First
array have to be equal size of second array(@datumi2) and all their values
have to be "".

----------------------
my $i;
my (@datumi2) = (1..100);
my (@temp, @data);

# block for optimization

for $i (0..$#datumi2) { push @temp, "" }
push @data, \@temp;
undef @temp;

# end of block for optimization

push @data, \@datumi2;
.
.
.


-- 
Matija

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to