Сортитировка емайлов по доменну?

[!TNK!]

короч пошарился по просторам
все сцылки сдохли либо не то :lol:.

Нуна сортировщик для мыл
по доменам (майл.ру туда яндекс сюда или просто выдирания по одному д.имени в локалке из ,тхт
мож кто ссцилку живую кинет можно примитивный какой нить скриптик или прожку

спс!

[TheSoul]

#! /usr/bin/perl -w

undef %saw;
open (FILE , "<emails.txt");
chomp(@email = <FILE>);
@email = grep(!$saw{$_}++, @email);
close FILE;

while (@email){
($login,$domain) = split /@/, shift @email;
open (EMAIL , ">>$domain.txt");
print EMAIL "$login\@$domain\n";
}
close EMAIL;

В файл emails.txt кидаешь мыла.
Прога удаляет дубли и разбивает список по доменам в txt файлы

[zerokko]

ОМГ!!! В точку... ))) В данный момент как раз доробатываю такую весчь на паскале :D На днях все оформлю и выложу... В отличии от вышевыложенного скрипта, неаписано на паскале и будет доходчива любому школьнику))) Также сначало идт отчистка файла от муссора...

[devton]

@echo off
FOR /F "tokens=1,2 delims=@" %%a in (%1) DO (echo %%b;%%a>>tmp.tmp)>nul
sort /o "%~dp0tmp2.tmp" "%~dp0tmp.tmp
echo.>%1
FOR /F "tokens=1,2 delims=;" %%c in (tmp2.tmp) DO (echo %%d@%%c>>%1)>nul
del tmp.tmp, tmp2.tmp

вставь этот код в bat.bat
положи его в одну папку со списком мыл (mails.txt например)
набери в строке bat mails.txt

и АККУРАТНО - драг&дроп не сработает. Ты просто убьешь файлег тк отсортированное содержимое пишецца в исходный файл - сохрани копию на всякий :)