https://www.opennet.ru/openforum/vsluhforumID9/8588.html #! /usr/bin/perl -w<br># Переменные объявленные как my (например my $var)- <br># не включаются в таблицу имен (*var) <br># и не имеют адреса по которому к ним можно обратиться (может если угадать.. ?)<br># Если передать их адресс какой-либо переменной $tmp, <br># то переменная $var автоматически поменяет свой адрес (типа компилятором.. ?)<br># (p.s. нельзя локализовать local $var после объявления my $var)<br><br>#ВОПРОС - если perl интерпретируемый язык - то откуда этот "компилятор"?<br><br>use strict;<br>our $tmp; <br><br>sub b{<br>my $var1 = "hello";<br>my $var2;<br><br>print "var1 =",\$var1," name_var1 = $var1\t";<br>print "var2 =",\$var2,"\t";<br><br>$tmp = \$var1;<br>print "\\\$tmp = ",\$tmp,"name \$\$tmp = $$tmp\n";<br>$$tmp = "bie"; #пытаемся изменить значение переменной var1 на "bie", но это бесполезно, т.к. var1 имеет уже другой адрес, после того как переменной $tmp передали указатель на начальный адрес переменной var1<br>return;<br>}<br><br>b;<br>b;<br>b;<br><br><br>--------------------<br>РЕЗУЛЬТАТ:<br><br>var1 =SCALAR(0x9652b80) name_var1 = hello<br>var2 =SCALAR(0 https://www.opennet.ru/openforum/vsluhforumID9/8588.html#11 Fri, 15 Jan 2010 14:44:49 GMT как интересно тебе ))<br>сначало сгенерировать заведомо глюкавый код а потом бегать и удивлятся ))<br><br><br> https://www.opennet.ru/openforum/vsluhforumID9/8588.html#10 Fri, 15 Jan 2010 13:33:57 GMT &gt;это НЕ функции!!!! это не Си!!!! это язык уровнем выше!!! интерпритаторный!!!! <br>&gt;он не является сильно-типизированным языком как Си - это интерпритатор <br>&gt;и my и local тут ограницения на уровне исполнения <br><br>будем считать - я понял.<br><br><br>&gt;&gt;&gt;ну какбы у перла много тонкостей при работе с переменными и вообще, <br>&gt;&gt;&gt;переменную типа "my" можно скажем сделать статичной (чтобы сохранялосья значение между <br>&gt;&gt;&gt;вызовами блока в котором она определена), так же у перла вроде <br>&gt;&gt;&gt;есть щняга типа "сборшик мусора" которая вычищает неиспользуемые переменные <br>&gt;&gt;&gt;<br>&gt;&gt;<br>&gt;&gt;Можно... например из того что в перл не существует вложенных функций? <br>&gt;<br>&gt;чево? ты про inline функции на Си? <br><br>я про то что переменная определенная во внешней функции как my во внутренней функции определяется только один раз вне зависимости от того сколько раз была вызвана внешняя функция.<br>ну типа того:<br><br>our $i = 0;<br><br>sub a($){<br> my $var = shift;<br> local $i = $var;<br> sub b{<br> print $var," - $i \n";<br> }<br> &b;<br>}<br><br>a(1);<br>a(2);<br>a(3);<br><br>#========= https://www.opennet.ru/openforum/vsluhforumID9/8588.html#9 Fri, 15 Jan 2010 11:35:13 GMT &gt;<br>&gt;&gt;я конечно еще тот "програмер", но по мойму называть my и local <br>&gt;&gt;функциями это какбы ... некрасиво <br>&gt;&gt;это опесатели области видимости переменных <br>&gt;&gt;<br>&gt;<br>&gt;Надеюсь проясню - меня больше интересует не сам перл, а то как <br>&gt;устроены на уровне си - его функции. (На этом уровне - <br>&gt;my и local ничто иное как функции). <br><br>это НЕ функции!!!! это не Си!!!! это язык уровнем выше!!! интерпритаторный!!!!<br>он не является сильно-типизированным языком как Си - это интерпритатор<br>и my и local тут ограницения на уровне исполнения<br><br>&gt;&gt;ну какбы у перла много тонкостей при работе с переменными и вообще, <br>&gt;&gt;переменную типа "my" можно скажем сделать статичной (чтобы сохранялосья значение между <br>&gt;&gt;вызовами блока в котором она определена), так же у перла вроде <br>&gt;&gt;есть щняга типа "сборшик мусора" которая вычищает неиспользуемые переменные <br>&gt;&gt;<br>&gt;<br>&gt;Можно... например из того что в перл не существует вложенных функций? <br><br>чево? ты про inline функции на Си?<br><br>&gt;&gt;эээ какбы сначала задачу формулируют а потом инструмент выбира https://www.opennet.ru/openforum/vsluhforumID9/8588.html#8 Fri, 15 Jan 2010 10:46:19 GMT <br>&gt;я конечно еще тот "програмер", но по мойму называть my и local <br>&gt;функциями это какбы ... некрасиво <br>&gt;это опесатели области видимости переменных <br>&gt;<br><br>Надеюсь проясню - меня больше интересует не сам перл, а то как устроены на уровне си - его функции. (На этом уровне - my и local ничто иное как функции).<br><br>&gt;ну какбы у перла много тонкостей при работе с переменными и вообще, <br>&gt;переменную типа "my" можно скажем сделать статичной (чтобы сохранялосья значение между <br>&gt;вызовами блока в котором она определена), так же у перла вроде <br>&gt;есть щняга типа "сборшик мусора" которая вычищает неиспользуемые переменные <br>&gt;<br><br>Можно... например из того что в перл не существует вложенных функций? <br><br>&gt;эээ какбы сначала задачу формулируют а потом инструмент выбирают ... <br>&gt;а вы както через жопу ... )) вам ваще шашечки или ехать <br>&gt;)) <br><br>=)) - я ж сказал уже -- шашечки ). Говорю - что перл, только маленькое бесцельное увлечение.<br><br><br> https://www.opennet.ru/openforum/vsluhforumID9/8588.html#6 Fri, 15 Jan 2010 10:38:25 GMT &gt;Кстати, может кто подскажет где можно посмотреть реализацию perl'овских функций (т.е. сырцы <br>&gt;перловского интерпритатора конкретно для функций my и local (а также немного <br>&gt;не в тему - bless)). Мне было не понятно следующее: <br><br>я конечно еще тот "програмер", но по мойму называть my и local функциями это какбы ... некрасиво<br>это опесатели области видимости переменных<br><br>&gt;1. обратите внимание, что переменные (my) меняют адреса при разных вызовах только <br>&gt;в случае если я пытался получить ее адрес. <br><br>ну какбы у перла много тонкостей при работе с переменными и вообще, переменную типа "my" можно скажем сделать статичной (чтобы сохранялосья значение между вызовами блока в котором она определена), так же у перла вроде есть щняга типа "сборшик мусора" которая вычищает неиспользуемые переменные<br><br>&gt;* По поводу того что язык не нов и изжит... в общем <br>&gt;для того и знакомлюсь с ним чтобы убедиться либо наоборот. <br>&gt;* Кстати Python - я так понял просто более читаем, но что <br>&gt;касается CPAN - то перл лидирует. <br><br>эээ https://www.opennet.ru/openforum/vsluhforumID9/8588.html#5 Fri, 15 Jan 2010 09:12:38 GMT &gt;&gt;Только непонятно, зачем всё это. Чего вы добиваетесь? Какого эффекта <br>&gt;&gt;ждёте? <br>&gt;<br>&gt;Видимо, сокрушить нам мозг. Тоже раза три перечитал, так и не понял, <br>&gt;к чему всё это... <br><br>Прошу прощения что не уточнил цель - я хочу понять "как устроено" в данном случае выделение памяти. <br><br>Кстати, может кто подскажет где можно посмотреть реализацию perl'овских функций (т.е. сырцы перловского интерпритатора конкретно для функций my и local (а также немного не в тему - bless)). Мне было не понятно следующее:<br><br>1. обратите внимание, что переменные (my) меняют адреса при разных вызовах только в случае если я пытался получить ее адрес.<br><br><br>* По поводу того что язык не нов и изжит... в общем для того и знакомлюсь с ним чтобы убедиться либо наоборот.<br><br>* Кстати Python - я так понял просто более читаем, но что касается CPAN - то перл лидирует.<br><br><br><br><br> https://www.opennet.ru/openforum/vsluhforumID9/8588.html#3 Thu, 14 Jan 2010 15:24:28 GMT &gt;Только непонятно, зачем всё это. Чего вы добиваетесь? Какого эффекта <br>&gt;ждёте? <br><br>Видимо, сокрушить нам мозг. Тоже раза три перечитал, так и не понял, к чему всё это...<br> https://www.opennet.ru/openforum/vsluhforumID9/8588.html#2 Thu, 14 Jan 2010 05:54:21 GMT Странные люди требуют непонятного :-)<br><br>&gt;# Переменные объявленные как my (например my $var)- <br>&gt;# не включаются в таблицу имен (*var) <br>&gt;# и не имеют адреса по которому к ним можно обратиться (может если угадать.. ?)<br><br>Какие ещё таблицы? Будьте проще: это просто локальные переменные, которые живут только пока выполняется блок, где они объявлены.<br><br>&gt;# Если передать их адресс какой-либо переменной $tmp, <br>&gt;# то переменная $var автоматически поменяет свой адрес (типа компилятором.. ?) <br><br>Это не так. Переменная будет иметь один и тот же адрес, пока не завершится блок, где она объявлена. После этого переменная исчезает (на самом деле всё немного сложнее, но в первом приближении так). При следующем входе в этот блок создаётся новая переменная с тем же именем.<br><br>Да, и бросьте вы эту чехарду с адресами - всё-таки на языке высокого уровня пишете.<br><br>&gt;# (p.s. нельзя локализовать local $var после объявления my $var) <br><br>Ой, что-то вы не того хотите, чует моё сердце. Почитайте perlsub: local - это совсем не то, что ка