- RU.PERL ----------------------------------------------------------- RU.PERL - Msg : #4063 [671] От : Mikhail Polykovsky 2:5020/400 12 июля 04, 17:33 Кому : Yury Kopyl 14 июля 04, 22:51 Тема : Re[2]: проблема ------------------------------------------------------------------------------- From: Mikhail PolykovskyAP>>> my $self = {}; AP>>> return (bless($self, $class)); MP>> А чем они должны различаться? Как ты проверяешь одинаковость? YK> я так подозреваю, что он использует Data::Dumper, а он, если элементы YK> одинаковые, начинает страдать фигней и выдавать записи в виде VARn=VARn+1 YK> :) ^^^^^^^^^^^ Упс. А вот такой записи я еще не встречал. Мне он честно сказал $VAR1 = bless( {}, 'T' ); $VAR2 = bless( {}, 'T' ); $VAR3 = bless( {}, 'T' ); $VAR4 = bless( {}, 'T' ); -- Михаил Полыковский http://copi.ru/27690/ Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru --- ifmail v.2.15dev5.3 * Origin: UTC (2:5020/400)