Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Michael Spector                      2:5020/400     24 Jun 2003  19:05:37
 To : All
 Subject : Re: Что-то странное ... или я что-то упустил
 -------------------------------------------------------------------------------- 
 
 Tue Jun 24 2003 17:39, Nick Kostirya wrote to Michael Spector:
 
  NK> From: Nick Kostirya <nick@han.kherson.ua>
 
  MS>>   DB<1> sub { $_[0] = "Abba"; }
  MS>>   DB<2> sub func { $_[0] = "Abba"; }
  MS>>   DB<3> $a = "BoneyM";
  MS>>   DB<4> func($a);
  MS>>   DB<5> print $a;
  MS>>   DB<6> Abba
  MS>>     ^^^^^ здесь всё нормально, как и должно быть
  MS>>   DB<6> $b = "Hello";
  MS>>   DB<7> func(\$b);
  MS>>   DB<8> print $b;
  MS>>   DB<9> Hello
  MS>>     ^^^^^  тоже хорошо
  MS>>   DB<9> sub func2 { $$_[0] = "Abba"; }
  MS>>   DB<10> func2(\$b);
  MS>>   DB<11> print $b;
  MS>>   DB<12> Hello
  MS>>      ^^^^^^ почему не Abba? ведь функция изменила значение 
 
  NK> адреса, алиасом
 
  MS>> которого является $_[0] ?
 
  MS>> Hу а тут вообще что-то странное:
 
  MS>>   DB<12> sub func3 { print $_[0]."\n".$$_[0]."\n"; }
  MS>>   DB<13> func3(\$b);
  MS>> SCALAR(0x1cccd68)
  MS>> Abba
 
  MS>>   DB<14> print $b;
  MS>>   DB<15> Hello
 
  MS>>      ^^^^^^ Это как ? ... в функции ето Abba, а за пределами 
  MS>>      Hello ?
  
 Так что же такое $$_[0]?
 
 --- ifmail v.2.15dev5
  * Origin: FidoNet Online - http://www.fido-online.com (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 Что-то странное ... или я что-то упустил   Michael Spector   24 Jun 2003 15:03:06 
 Re: Что-то странное ... или я что-то упустил   Nick Kostirya   24 Jun 2003 17:39:55 
 Re: Что-то странное ... или я что-то упустил   Michael Spector   24 Jun 2003 19:05:37 
 Re: Что-то странное ... или я что-то упустил   Artem Chuprina   25 Jun 2003 13:03:44 
 Re: Что-то странное ... или я что-то упустил   Artem Chuprina   24 Jun 2003 17:47:12 
Архивное /ru.perl/166795ba348b7.html, оценка 1 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional