|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Ivan Frolcov 2:5020/175.2 15 Jan 2001 13:33:56 To : Ivan Frolcov Subject : Re: Declare and init hash -------------------------------------------------------------------------------- MS>>> Теперь начинаем корячиться, пытаясь сделать объявление и MS>>> инициализацию хэша в один оператор... MS>> Так никто не знает или просто все стесняются ответить? IF> Шаркая ножкою... IF> my(%hash)= ( (map { $k[$_] => $v[$_] } grep {$_%2} (0..$#k)) , IF> map { $k[$_] => $v[$_] } grep {! ($_%2)} (0..$#k)); Что-то я сам себя перемудрил :-) my(%hash)= (map { $k[$_] => $v[$_] } (0..$#k)); --- ifmail v.2.15 * Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/330098b1013d.html, оценка из 5, голосов 10
|