PDA

Просмотр полной версии : Удалить дубликаты


PomaH9991
11.07.2009, 15:30
Помогите плиз есть список в нём много дублей но написаных в разном регистре, с помощю чего можно удалить такие дубликаты?

Cthulchu
11.07.2009, 15:33
ТС, поздравляю, ты создал стотысячную тему с просьбой расказать сказку о дубль киллере! Молодец! Свой приз проси у Гугла. Он вкурсе.

eLWAux
11.07.2009, 15:38
#!/usr/bin/perl -w -elw
#use: anti-dubl.pl input.txt

$inputF = shift;
$ouputF = 'out_'.$inputF;

open (F , "<$inputF");
@input = <F>;
chomp (@input);
close F;
%out = ();
@input = grep(!$out{$_}++, @input);

open (F , ">>$ouputF");
print F join("\n",@input);
close F;

Barsik
11.07.2009, 15:40
http://www.google.com/search?hl=ru&client=opera&hs=XHb&q=Text+Duplicates+Killer&btnG=%D0%9F%D0%BE%D0%B8%D1%81%D0%BA&lr=
Text Duplicates Killer

br3k
11.07.2009, 15:49
Raptor

Nelzone
11.07.2009, 16:45
dubkill