Спасите Велю от парсера...

[Велемир]

<?php

set_time_limit(0);

$fp = fopen("source.txt","r");
$m = fopen("mail.ru.txt","w");
$yah = fopen("yahoo.txt","w");
$yan = fopen("yandex.txt","w");

while(($line = fgets($fp)) !== false ) {

$line = fgets($fp,1024);

if(preg_match("/^[0-9a-z_]+@mail.ru/",$line)) {

fwrite($m,$line);


}

if (preg_match("/^[0-9a-z_]+@yahoo.com/",$line)) {

fwrite($yah,$line);

}

else if(preg_match("/^[0-9a-z_]+@yandex.ru/",$line)) {


fwrite($yan,$line);

}


}

fclose($fp);
fclose($m);
fclose($yah);
fclose($yan);

?>

В чём ашиппко не понимать:( Хотел написать простенький парсер по принадлежности мыл к домену с сохранением оных ф фаилег :(:(:(.Объясните,в чём я не прав)

[Zedi]

<?php

set_time_limit(0);

$fp = file("source.txt");
$m = fopen("mail.ru.txt", "w");
$yah = fopen("yahoo.txt", "w");
$yan = fopen("yandex.txt", "w");

foreach ($fp as $line)
{

if (preg_match("/^[0-9a-z_]+@mail.ru/", $line))
{
fwrite($m, $line);
}

if (preg_match("/^[0-9a-z_]+@yahoo.com/", $line))
{
fwrite($yah, $line);

}
if (preg_match("/^[0-9a-z_]+@yandex.ru/", $line))
{
fwrite($yan, $line);

}


}
fclose($m);
fclose($yah);
fclose($yan);

?>
пробуем (я не пробовать должно пахать)

[Pashkela]

while (!feof($fp))