Форум АНТИЧАТ - Показать сообщение отдельно

Скрипт разбивки угнанных асег по файлам:

PHP код:


		
			
<?php

 $r=";"; //разделитель

 $f=file("source.txt"); //файл с аськами

 $si=fopen("6.txt","a+"); //шохи

 $s=fopen("7.txt","a+"); //семёрки

 $e=fopen("8.txt","a+"); //восьмёры

 $n=fopen("9.txt","a+"); //девятки

 $o=fopen("o.txt","a+"); //остальное

 for($i=0;$i<count($f);$i++)

 {

     $l=explode($r,trim($f[$i]));

     switch(strlen($l[0]))

     {

         case 6: fwrite($si,$f[$i]);break;

         case 7: fwrite($s,$f[$i]);break;

         case 8: fwrite($e,$f[$i]);break;

         case 9: fwrite($n,$f[$i]);break;

         default: fwrite($o,$f[$i]);break;

     }

 }

 fclose($si);

 fclose($s);

 fclose($e);

 fclose($n);

 fclose($o);

?>