my @matrix = ();
while (my @arr = $sth->fetchrow_array) {
push @matrix, \@arr;
}
for my $row (@matrix) {
print join " ", @$row;
}
Perl array
Помогите кто может начинающему.
Значит ситуация такая: есть двухмерный массив,сделал запрос к БД и загнал все ето в массив.
while (my @ary = $sth->fetchrow_array())
{
push(@matrix, [@ary]); }
теперь хочу написать функцию,которая выводила бы этот массив,независимо от размера
foreach $one (@array)
{print $one}
так все нормально но только с одномерным,а как сделать с двухмерным?
Значит ситуация такая: есть двухмерный массив,сделал запрос к БД и загнал все ето в массив.
while (my @ary = $sth->fetchrow_array())
{
push(@matrix, [@ary]); }
теперь хочу написать функцию,которая выводила бы этот массив,независимо от размера
foreach $one (@array)
{print $one}
так все нормально но только с одномерным,а как сделать с двухмерным?
Цитата:
Originally posted by AndreyK
Помогите кто может начинающему.
Значит ситуация такая: есть двухмерный массив,сделал запрос к БД и загнал все ето в массив.
while (my @ary = $sth->fetchrow_array())
{
push(@matrix, [@ary]); }
теперь хочу написать функцию,которая выводила бы этот массив,независимо от размера
foreach $one (@array)
{print $one}
так все нормально но только с одномерным,а как сделать с двухмерным?
Помогите кто может начинающему.
Значит ситуация такая: есть двухмерный массив,сделал запрос к БД и загнал все ето в массив.
while (my @ary = $sth->fetchrow_array())
{
push(@matrix, [@ary]); }
теперь хочу написать функцию,которая выводила бы этот массив,независимо от размера
foreach $one (@array)
{print $one}
так все нормально но только с одномерным,а как сделать с двухмерным?
как вариант
Код: