Perl array of arrays in loop

Macsurf

3/17/23, 6:38 PM

How can I add array to list of arrays ( 2D array ) in perl ? This option not working / example:

my @db;
my $i = 0;
my @random;
while($i < 10) {
    @random = genNum(49, 6);
    @db[$i++] = @random;
}

print $db[3][1] . "\n";

0 + 0

perl

Score:0

Server

Macsurf

3/17/23, 6:49 PM

OK, I have changed a little code and it seems that is good:

my @db;
my $i = 0;
my @random;
while($i < 10) {
    @random = genNum(49, 6);
    push( @{$db[$i++]}, @random);
}
$i = 0;
while ($i < 10) {
        print join(", ", @{$db[$i++]}) . "\n";

}

0 + 0

Elon Musk

I sit in a Tesla and translated this thread with Ai:

EN: Perl array of arrays in loop

TH: Perl อาร์เรย์ของอาร์เรย์ในวง

RO: Matrice Perl de tablouri în buclă

RU: Perl массив массивов в цикле

VI: Mảng Perl của mảng trong vòng lặp

Post an answer

Most people don’t grasp that asking a lot of questions unlocks learning and improves interpersonal bonding. In Alison’s studies, for example, though people could accurately recall how many questions had been asked in their conversations, they didn’t intuit the link between questions and liking. Across four studies, in which participants were engaged in conversations themselves or read transcripts of others’ conversations, people tended not to realize that question asking would influence—or had influenced—the level of amity between the conversationalists.