ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > PHP, PERL, MySQL, JavaScript
   
 
 
Опции темы Поиск в этой теме Опции просмотра

  #14  
Старый 04.10.2009, 18:02
ReduKToR
Постоянный
Регистрация: 05.01.2009
Сообщений: 684
Провел на форуме:
3281634

Репутация: 485


Отправить сообщение для ReduKToR с помощью ICQ
По умолчанию

решил так:
PHP код:
<?php 
set_time_limit
(0)or die ("Время работы скрипта ограниченно"); 
$file           "KI.sql";    #Файл адресами 
$out[0]         = "mail.txt"
$out[1]         = "yandex.txt"
$out[2]         = "gmail.txt"
$out[3]         = "nextmail.txt"
$out[4]         = "rambler.txt"
$out[5]         = "pochta.txt"
$out[6]         = "ru.txt"
$out[7]         = "bk.txt"
$out[8]         = "ukr.txt"
$out[9]         = "wp.txt"
$out[10]        = "other.txt"
$rep[0]         = "#([a-zA-Z0-9-_.])+@(mail.ru)#i"
$rep[1]         = "#([a-zA-Z0-9-_.])+@(yandex.ru)#i"
$rep[2]         = "#([a-zA-Z0-9-_.])+@(gmail.com)#i"
$rep[3]         = "#([a-zA-Z0-9-_.])+@(nextmail.ru)#i"
$rep[4]         = "#([a-zA-Z0-9-_.])+@(rambler.ru)#i"
$rep[5]         = "#([a-zA-Z0-9-_.])+@(pochta.ru)#i"
$rep[6]         = "#([a-zA-Z0-9-_.])+@(ru.ru)#i"
$rep[7]         = "#([a-zA-Z0-9-_.])+@(bk.ru)#i"
$rep[8]         = "#([a-zA-Z0-9-_.])+@(ukr.net)#i"
$rep[9]         = "#([a-zA-Z0-9-_.])+@(wp.pl)#i"
$rep[10]        = "#([a-zA-Z0-9-_.])+@([^yandex|mail|rambler|pochta|bk|ukr|gmail|wp])+([a-zA-Z0-9-.])+\.([a-zA-Z]){2,3}#i"
$a fopen ($file,"r")or die ("Не могу прочитать файл адресами"); 
while (!
feof($a)): 
      
$email fread ($a,1024); 


for (
$x=0;$x<=count($rep);$x++) 

    @
preg_match_all($rep[$x],$email,$outt); 
    
$fp fopen (@$out[$x], "a+"); 
    for (
$xx=0;$xx<=count($outt);$xx++) 
    if(@
$outt[0][$xx])@fputs($fp, @$outt[0][$xx]."\n"); 

endwhile; 
@
fclose ($a); 
@
fclose ($fp); 
?>
Спасибо теме полезные скрипты....
не актуально
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Методы "вспоминания" пароля (от мыла) censored! E-Mail 175 05.06.2010 16:57
где скачать прогу !!! для взлома мыла !!! Litvik E-Mail 7 19.07.2006 14:09
Как можно атачить файл с левого мыла? donetsk Болталка 3 24.05.2006 17:51



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ