|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Sergey Skvortsov 2:5020/400 28 Dec 2003 23:30:21 To : Artem Chuprina Subject : Re: ссылки на строки -------------------------------------------------------------------------------- Artem Chuprina пишет: EG>> А что, присваивание строк в перле не копирует разве? AC> AFAIR copy-on-write. Hе будешь туда писать - не будет копировать. ага, щас. use strict; use Devel::Peek; my $a='test'; my $b=$a; Dump($a); Dump($b); SV = PV(0x15d5d0c) at 0x1a45f60 REFCNT = 1 FLAGS = (PADBUSY,PADMY,POK,pPOK) PV = 0x15dda64 "test"\0 CUR = 4 LEN = 5 SV = PV(0x15d5d24) at 0x1a45f0c REFCNT = 1 FLAGS = (PADBUSY,PADMY,POK,pPOK) PV = 0x1a4ae8c "test"\0 CUR = 4 LEN = 5 сравниваем PV и ужасаемся. -- Sergey Skvortsov mailto: skv@protey.ru Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru --- ifmail v.2.15dev5.1 * Origin: Talk.ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/648813f4452a.html, оценка из 5, голосов 10
|