Парсер email

[ruslanback]

Помогите найти прогу для извлечения всех имейлов из текстового файла. С меня база адресов линейщиков 200к+ штук.

[Zeratyl]

Месье, никак задумали, спам рассылать? Что хорошо у Шоу, то у вас - нехорошоу.

Прогу можно накатать на сишке, strstr творит чудеса.

[Romka]

Я когда таким занимался(в смысле выдирал инфу из тхтшника) Notepad++ обходился

[Arzamas]

в каком виде записи в файле?

[ruslanback]

INSERT INTO accounts VALUES ('njk96', '7pTPxgaWdKQ8EuooU5WckMHapzGrfV2Az5HmAHMHirKiQR9DXRgReycLUWa0galo+m+zga0ZKGO8eROjOVob5g==', '1304321111', '0', '213.138.88.204', '1', null, 'null@null', '1', '1.5', '1304804556', '0', '*', '604800', '1', '0', '54321', '12345', 'tkachenko.tolik@mail.ru');

leonid73@yandex.ru:vfyzif

ff21f515b070be079abae5128a20093c:9<Irr$`|q}Y20;r-5W7Nn|1;{1N]":andrei.callahan@yandex.ru

Pizda:::ncixe9@mail.ru:::1abc172a279384fa948acbe244e2939a:::,ii

[Effas]

Удали все таблицы кроме Емейла, затем конверт в тхт, в чем сложность?!

[FewG]

Могу написать, не даром, разумеется. Пиши в ПМ.

[BigSnake]

скрипт getmail.pl

PHP код:

<?php 

while (<>) {

  chomp;

  if (/(([a-z0-9_\-]+\.)*[a-z0-9_\-]+@([a-z0-9][a-z0-9\-]*[a-z0-9]\.)+[a-z]{2,4})/i) {

     print "$1\n";

  }

} 

[Dеmon]

Можно поудалять лишние колонки через тот же Навикэт, а можно и через Excel.

[Arzamas]

PHP код:

<?php

$path = "./forum.sql"; //путь к файлу с мылами

$save_path = "./result.txt"; //файл результата

$pattern = '/\b[A-Z0-9._%+-]+@(?:[A-Z0-9-]+\.)+[A-Z]{2,6}\b/i';

$contents = file_get_contents($path);

preg_match_all($pattern,$contents,$matches);

foreach($matches[0] as $value){

    file_put_contents($save_path,"$value\r\n",FILE_APPEND);

}

?>