Архив форумов ЦИТФорума

[chertёnok]

подсажите, пожалста..а то я че то совсем туплю..
у меня есть массив, который я передаю из другого модуля
my ($structure) = @_;
если его вывести, то он имеет вид:
$structure:
$VAR1=[
{
'CHILDS' =>
[
{
'CHILDS' =>[],
'NAME' =>'UDP'
},
{
'CHILDS' =>[],
'NAME' =>'FTP'
},
],
'NAME' =>'Cable'
},
{
'CHILDS' =>[],
'NAME' =>'Disk'
},
];

мне нужно посчитать общее количество элементов..т.е. - 4
если написать:
print"\n---chislo---", scalar(@$structure); - скажет, что у нас 2 элемента, т.е. он посчитал элементы первого уровня, а мне нужно посчитать и то что внутри первого,т.е. зайти туда, а если написать:
print"\n---chislo---",Dumper(scalar(@{$structure->{CHILDS}})); - то он тоже..не считает...