perl ithreads, shared и загадочное изменение адресов

Gроблемы людей, закладывающихся на адреса при разработке на perl, авторов perl, очевидно, не волнуют ни в какой мере. Бо такими людьми должны заниматься врачи.

Стрингификация референсов -- часть перла. Использование этих строк для идентификации объектов -- распространенная техника. Значит должны быть гарантии.

> Отладочная печать показывает, что до и после выполнения абсолютно безобидных строчек. Например таких: if (!defined($some_var))

Безобидные строчки не при чем.  Если просто выполнить такой код:


  if (ref($expr) eq 'ARRAY')
  {
    warn "EEEaddr2.7 " . $expr->[1] . "\n";
  }
  if (ref($expr) eq 'ARRAY')
  {
    warn "EEEaddr2.8 " . $expr->[1] . "\n";
  }

то будут выданы 2 разных адреса.  Это при том что сам $expr не зашарен.

лана:) я понял как обойти -- я адреса использовал для идентификации объектов. Можно для этой же цели использовать bless/ref

Мы пробовали использовать треды в Perl.
Если кратко - они не работают.

Крайне не советую браться за перловые треды.

> Стрингификация референсов -- часть перла. Использование этих строк для идентификации объектов распространенная техника.

Ээ... то что ссылка не есть строка (и о последствиях этого факта) есть как минимум в Perl Cookbook. А может и в туториале. FM, его таки полезно читать.

а я вообще не втыкаю, зачем треды, когда лучше процессы?

Чем лучше? Тем, что тяжелее? Или тем, что шарить память труднее? :)

> адреса некоторых объектов _МЕНЯЮТСЯ_

Не специалист в perl, но возможно это отрабатывает GC?

ниче там трудного нет в шарении памяти! просто есть книга, с рецептами, там про шареную память несколько простых примеров(реально простых, я без выпендрежа говорю), разобравшись в которых за один день я спокойно юзаю эту шареную память. библиотека для шареной памяти есть IPC::Shareable она все и делает.

> Не специалист в perl, но возможно это отрабатывает GC?

в тех местах где я использую адреса я специально слежу чтобы все структуры были живыми (на них есть хотя бы одна ссылка) пока мне нужны их адреса. Конечно если объект умрет, то новый объект может случайно иметь тот же адрес, я это учитываю. Но живой объект не меняет свой адрес просто так.

Когда же я начинаю в некоторых местах добавлять shared/share то один и тот же объект меняет свой адрес. Я думаю перл таким образом пытатеся обеспечить атомарность -- он переписывает указатели.

мне в перле не нравится то что даже когда какие-то структуры вроде бы константны, то перл в них все равно пишет (счетчики ссылок и т.п.) Из-за этого ты перл толком и не форкнешь -- все равно произойдет дублирование общих данных.

Опять же, не знаю какой GC применяется в perl, но во многих алгоритмах GC даже живые объекты могут менять адреса при уборке мусора. Но это возможно только в тех языках, где есть разница между указателем и целым и нету возможность свободно преобразовывать одно в другое.

> Опять же, не знаю какой GC применяется в perl

Подсчет ссылок.