HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ФИНАНСОВЫЕ ЗАДАЧИ/СОЦИАЛЬНЫЕ СЕТИ > Социальные сети
   
 
 
Опции темы Поиск в этой теме Опции просмотра

  #5  
Старый 19.02.2009, 00:10
>.:!FrE!:.<
Участник форума
Регистрация: 19.07.2008
Сообщений: 168
Провел на форуме:
1312476

Репутация: 85
По умолчанию

Цитата:
Сообщение от eXmasteR  
Это для удаления бредовых строк:
PHP код:
<?php
$input
="vkfile.txt";   //входной файл
$output="vkfile-pars.txt";    //выходной файл
$out=fopen($output,"w+");
$f=fopen($input,"r");
 while (!
feof($f))
 {
  
$st=fgets($f,256);
  if((
strpos($st"@")>0)&&(strpos($st":")!=(strlen($st)-3))) fputs($out,$st);
 }
 
fclose($out);
 
fclose($f);
 echo 
"Программа успешно завершила работу.Счастливого нового года!";
?>
а для удаления повторов советую http://www.softforfree.com/programs/...ler-11932.html
Два в одном

PHP код:
<table>  
<tr>  
<td valign=top><form method="post">  
<TEXTAREA NAME=mails ROWS=30 COLS=50></TEXTAREA>  
<br/><input type="submit">  
</form>  
<td nowarp>  
<?  
if (isset($_POST['mails']))  
{  
    
$mails=strtolower($_POST['mails']);  
    
preg_match_all('~[a-zA-Z0-9\.\_\-]+@[a-zA-Z0-9\_\-]+\.[a-zA-Z]{2,5}:(.*)~i',$mails,$result); 
    echo 
join('<br/>',array_unique(  
array_map('htmlspecialchars',$result[0])));  
}  
?>  
</table>
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
парсер дампов БД v.o2 eLWAux С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby 15 07.09.2009 18:56
Делфи исходник фейка Mail Агент 5.1 TreV@N С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby 1 06.02.2009 19:49
Простой апгрейд фейка QIP Pyhin Skype, IRC, ICQ, Jabber и другие IM 6 15.12.2008 14:38



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


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




ANTICHAT ™ © 2001- Antichat Kft.