Тема: [Perl] Новичкам: задаем вопросы
Показать сообщение отдельно

  #672  
Старый 25.07.2008, 17:26
Kaimi
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
С нами: 9851426

Репутация: 1676


По умолчанию
Цитата:
как удалить повоторы в массиве ? в нем такие данные (примерно)
undef %saw;
@out = grep(!$saw{$_}++, @in);
 
Ответить с цитированием