Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Общие вопросы > Глючу с указателями

Автор: HISH 8.7.2004, 10:07

Пишу свой класс, имеется в нем примерно такая строчка (чтобы структуру объяснить):

Код


      ${${${$array[$counter]}{BUTTONS}}[$btn_counter]}{ID} = $1;

то есть $array - массив ссылок на хэш (1-го уровня). в этом хэше есть ключик {BUTTONS} - содержит указатель на массив указателей на хэши(2-го уровня)

и в этом последнем хэше ключю {ID} присваивается какое-то значение. это преамбула. (если тут уже есть ошибки, поправьте, плз).
Далее есть такой код:

Код


  foreach $lnk (@array){
  	if (условие){
    %tbl = %{$lnk};
  	};
  };
#по идее, после этого %tbl должен быть не копией, а имеено одним из хэшэй первого уровня
  @mas = @{$tbl{BUTTONS}};
#@mas должен быть массивом (а не копией массива), ссылка на который содержится в %tbl, ключе BUTTONS
  #какие-то изменения @mas
  open f, ">/home/predator/log.txt";
  print f Dumper(@mas);
  print f "-----------------------\n";
  print f Dumper(@{$tbl{BUTTONS}});
  print f "-----------------------\n";
  close f;

после выполнения этого кода в логе видно, что @mas изменяется, а @{$tbl{BUTTONS}} остается прежним - как будто я @mas создавал из значений @{$tbl{BUTTONS}}, а не создал его по ссылке.

Меня терзают смутные сомнения, что я где-то очень сильно торможу по недосыпу... Ткните носом, где тыт ошибка, кому не лениво во всем этом разбираться

Автор: ElectricalStorm 8.7.2004, 12:01

1) Указателей в Perl нет ...
2) Используйте более ясный синтаксис '->' тогда будет и вам и нам понятнее
3) Для дампа сложных структур используйте Data::Dumper

если не поможет пишите

Автор: HISH 8.7.2004, 13:02

Цитата

1) Указателей в Perl нет ...

хорошо, назовем это умными указателями... или даже вернее будет назвать дескрипторами. суть-то от этого не меняется, я полагаю?

для дампа используется Data::Dumper, как вы и написали....

сейчас со стрелочками попробую переписать.

Автор: HISH 8.7.2004, 17:42

Всем спасибо, поспал и ошибка нашлась

Во-первых действительно лучше писать со стрелочками (не знаю почему раньше там не делал

, а во-вторых... просто глючил