LINUX.ORG.RU

perl + трехмерный массив


0

0

ммм
хочу посторить такой массив

elem[0]{'id'} = ...
elem[0]{'name'} = ...
...
elem[3]{'name'} = ...
...

и что-то на перле у меня это не выходит :((((

[cgi-bin]# cat arratest.pl

#!/usr/bin/perl -w
#
#use strict;

print "\n";
my @a = (1, 3 ,4 ,5 ,6 ,7);

my @elem = ();
my $i = 0;
foreach my $aa (@a)
{
    $elem[$i] = ();
    $elem[$i]{'id'} = $aa;
    $elem[$i]{'name'} = $i;
    $i++;
}

[cgi-bin]#    

и еще, 
$dbh = DBI::connect(...)

постоянно ругаеться при включенном strict
как правельно объявлять глоб переменные ????

                         

3д-массив: так же как 2д-массив.

my @a = ([1,2,3], [4,5,6], [7,8,9]); # 2d array
my @b = (\@a, \@a, \@a); # 3d array

глоб переменные: вообще твоя переменная my @a - package-global
если надо на несколько модулей шарить 1 переменную - our @a (объявлять надо в каждом модуле).
+ читать про mod_perl, там есть подводные камни насчет глобальных переменных.

про DBI::connect.. показывай код.
perldoc DBI не помогает?

waker ★★★★★
()
Ответ на: комментарий от waker

>и еще, >$dbh = DBI::connect(...)

>постоянно ругаеться при включенном strict >как правельно объявлять глоб переменные ???? в смысле предепреждает что $dhb - undefined variable => поэтому и спросил про объявление глоб перемен.

а вообще спасибо )

hose
() автор топика
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.