|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Konstantin Dolgan 2:5020/400 28 Feb 2003 11:58:25 To : All Subject : Hashes as keys --------------------------------------------------------------------------------
Можно ли сделать что-то подобное?
Имеется:
my $hash1 = {
{ 'name' => 'ivanov',
'mail' => 'ivan@mmm.com',
} => 1,
{ 'name' => 'petrov',
'mail' => 'petr@mmm.com',
} => 2,
};
my $hash2 = { 'name' => 'petrov',
'mail' => 'petr@mmm.com'
};
Hадо:
вытащить из $hash1 значение с ключем $hash2,
или проверить наличие оного exists-ом.
Реально ли такое чудо?
Пробовал "tie %$hash1, 'Tie::RefHash'" - наверное, не так пробовал:
$hash1->{$hash2} всегда получается =1,
$hash1->{%$hash2} - всегда =undef,
а exists - всегда exists.
То ли лыжи не едут, то ли я ....????
Спасибо. Константин
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6577e71dc6c5.html, оценка из 5, голосов 10
|