VPF::Аналог array_unique() - Форум программистов

TwiSteR

Дата 20.6.2005, 23:31 (ссылка)

(нет голосов)

Загрузка ...

Кибер красавчег

Профиль
Группа: Участник
Сообщений: 231
Регистрация: 15.6.2005
Где: World->Russia

Репутация: нет
Всего: 2

Цитата

array_unique

(PHP 4 >= 4.0.1, PHP 5)
array_unique -- Убрать повторяющиеся значения из массива
Описание
array array_unique ( array array )

array_unique() берёт в качестве параметра array и возвращает новый массив без повторяющихся значений.

Обратите внимание, что ключи сохранятся. array_unique() сначала сортирует значения как строки, сохраняет первый встреченный ключ для каждого значения и игнорирует все последующие ключи. Это не означает, что первый ключ каждого значения неотсортированного array будет сохранён.

Замечание: Два элемента считаются одинаковыми в том и только в том случае, если (string) $elem1 === (string) $elem2. Другими словами: если у них одинаковое строковое представление.

Будет использован первый элемент.

Существует ли в перле аналог этой функции ?

--------------------

korob2001

Дата 21.6.2005, 01:22 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 31
Всего: 61

Не знаю это то, что тебе нужно или нет, но делается в Perl так:

Код


#!/usr/bin/perl
use strict;

my @arr = qw( Denis Anton Jelena Svetlana Anton );
my %hash;

$hash{ $_ }++ foreach ( @arr );

@arr = keys %hash;
print join("\n", @arr);

Если что-то не подходит, дай знать, что именно.
Удачи.

--------------------

"Время проходит", - привыкли говорить вы по неверному пониманию.
"Время стоит - проходите вы".

TwiSteR

Дата 21.6.2005, 07:21 (ссылка)

(нет голосов)

Загрузка ...

Кибер красавчег

Профиль
Группа: Участник
Сообщений: 231
Регистрация: 15.6.2005
Где: World->Russia

Репутация: нет
Всего: 2

korob2001

Да такой код подходит,
Спасибо огромное

Это сообщение отредактировал(а) TwiSteR - 21.6.2005, 07:27

--------------------

dimes

Дата 21.6.2005, 09:13 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 249
Регистрация: 20.7.2004
Где: то около СПБ

Репутация: нет
Всего: 14

А короче так:

Код


%_=();
@arr=grep { !$_{$_}++ } @arr;

Кто сможет еще короче написать? smile

TwiSteR

Дата 21.6.2005, 10:23 (ссылка)

(нет голосов)

Загрузка ...

Кибер красавчег

Профиль
Группа: Участник
Сообщений: 231
Регистрация: 15.6.2005
Где: World->Russia

Репутация: нет
Всего: 2

dimes
отлично, короче некуда !

Всем 10х

--------------------

korob2001

Дата 21.6.2005, 22:01 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 31
Всего: 61

Цитата

Кто сможет еще короче написать?

Том Кристиансен и Натан Торкингтон. smile

ЗЫ: Этот способ лучше не потому, что он короткий, а потому, что не утрачивается порядок элементов массива.

--------------------

"Время проходит", - привыкли говорить вы по неверному пониманию.
"Время стоит - проходите вы".

dimes

Дата 22.6.2005, 08:22 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 249
Регистрация: 20.7.2004
Где: то около СПБ

Репутация: нет
Всего: 14

Цитата(korob2001 @ 21.6.2005, 23:01)

ЗЫ: Этот способ лучше не потому, что он короткий, а потому, что не утрачивается порядок элементов массива.

Надеюсь ты говориш про способ предложенный мною иначе буду спорить smile

Sadok

Дата 22.6.2005, 09:44 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 74
Регистрация: 2.11.2004

Репутация: 1
Всего: 2

dimes

Цитата

Кто сможет еще короче написать?

Копирайт

Perl Cookbook, 2nd Edition
Pub Date : August 2003
ISBN : 0-596-00313-7

Авторов korob2001 назвал.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Общие вопросы \| Следующая тема »