Witam
Zaczełem pisać skrypt który będzie miała za zadanie odwiedzanie stron www oraz pobieranie z nich adresów email i zapisanie ich do pliku. Kod:

[PHP] pobierz, plaintext 
<?php
set_time_limit(0);
error_reporting(E_ALL);
 
class spider {
private $emaile = array();
private $adresy = array();
private $file = 'baza.txt';
 
public function __construct( $url )
  {
  $this->check_urls( $url );
  }
 
private function check_urls( $url )
  {
  if(!$dane = @file_get_contents($url))
   {
   echo 'Strona nie istnieje';
   exit;
   }
	else
	{
	$this->regexp_www( $dane );
	}
  }
 
public function check_email()
  {
   foreach($this->adresy[1] as $www)
	{
	$this->regexp_email( @file_get_contents('http://'.$www) );
	}
  $this->write();
  }
 
private function write()
  {
  $a = 0;
  $hand = fopen($this->file, 'a');
  flock($hand, LOCK_EX);
  foreach($this->emaile as $email)
	{
	  if(!empty($email[0]))
	  {
		foreach($email[0] as $right)
		{
		$a++;
		fwrite($hand, $right."\n");
		}
	  }
	}
  flock($hand, LOCK_UN);
  fclose($hand);
  echo $a;
  }
 
private function regexp_email( &$dane )
  {
  return preg_match_all('#([\w\.]+)@{1}([\w\.]){1,}\.([a-zA-Z]){2,4}#si', $dane, $this->emaile[]);
  }
 
private function regexp_www( &$dane )
  {
  return preg_match_all('#<a href="http:\/\/(.*?)"#si', $dane, $this->adresy);
  }
}
 
$spider = new spider($_GET['adres']);
$spider->check_email();
?>
[PHP] pobierz, plaintext 

No i jak widać skrypt pobiera adres 1 strony z urla. Następnie wchodzi na tą strone i pobiera wszystkie adresy www które pasują do regexp i gdy juz je pobierze i zapisze w składowej to otwiera tą strone i wyciąga z niej emaile.

No i mój problem jest taki że nie wiem jak to zapętlić. Aby skrypt wchodził na strone, zczytywał z niej adresy potem je otwierał i następnie zczytywał adresy stron oraz email i tak wkórło powiedzmy do while(count($this->adresy) < 100). ;/

poczytaj o rekurencji

[ot]a potem dostaje 10 spamow dziennie[/ot]

[ot]polecam wrzucić na stronę truciznę z http://polish.spampoison.com/[/ot]

(hmmm, to chyba nie do końca off topic)

Sopel, tylko, ze taką "trucizne" bardzo łatwo obejsc

tak, tylko trzeba o niej wiedzieć ;-)

[PHP] pobierz, plaintext 
<?php
	set_time_limit(1000);
 
 
 
 
	class Bot
	{
		const BOT_NAME = 'SeekerDodger';
		const BOT_VER = 0.2;
		/**
		 * Tablica z adresami do odwiedzenia
		 * @var array
		 */
		private $aLinks = array();
		/**
		 * Tablica ze znalezionymi mailami
		 * @var array
		 */
		private $aMails = array();
		 
		/**
		 * Konstruktor
		 * @param string, array adres wyjsciowy
		 * @param int ilosc adresow do przeszukania
		 */
		public function __construct( $adress, $ilosc = 10, $mail_s = 0  )
		{
			if ( is_array($adress) )
			{
				foreach( $adress as $line )
				{
					if ( !in_array($line,$this->aLinks) )
					{
						$this->aLinks[] = $line;
					}
				}
			}
			elseif( is_string($adress) )
			{
				$this->aLinks[] = $adress;
			}
 
			for( $i = 0; $i <= $ilosc; $i++ )
			{
				$string = @file_get_contents($this->aLinks[$i]);
				if ( $string !== FALSE )
				{
					preg_match_all('#<a(.*?)href="(.*?)"(.*?)>#si',$string,$matches);
					foreach ( $matches[2] as $link )
					{
						if ( !ereg('http://([-_\.a-zA-Z0-9]+)\.([-_a-zA-Z0-9?=]+)',$link) )
						{
							if ( !ereg('^(callto|gg|mailto|jid)+',$link) )
							{
								$url = $this->TemporaryURL($this->aLinks[$i]);
								if ( !in_array($url . $link,$this->aLinks) )
								{
									$this->aLinks[] = $url . $link;
								}
							}
						}
						else
						{
							if ( !in_array($link,$this->aLinks) )
							{
								$this->aLinks[] =  $link;
							}
 
						}
					}
 
					if ( $mail_s == 1 )
					{
						$this->Mails($string);
					}
 
				}
			}
 
		}
 
		public function ShowLinks()
		{
			echo '<pre>';
			print_r($this->aLinks);
			echo '</pre>';
		}
 
 
		public function ShowMails()
		{
			echo '<pre>';
			print_r($this->aMails);
			echo '</pre>';		
		}
 
 
		/**
		 * Przepisuje wyszukane maile z tablicy do pliku
		 * @param string
		 */
		public function SaveLinksToFile( $filename )
		{
			$fp = fopen($filename,'a');
			foreach ( $this->aLinks as $Line )
			{
				fwrite($fp,$Line . "\r\n");
			}
			fclose($fp);
		}
 
		/**
		 * Przepisuje wyszukane maile z tablicy do pliku
		 * @param string
		 */
		public function SaveMailsToFile( $filename )
		{
			$fp = fopen($filename,'a');
			foreach ( $this->aMails as $Line )
			{
				fwrite($fp,$Line . "\r\n");
			}
			fclose($fp);
		}
 
		/**
		 * Szuka maili w podanym tekscie
		 * @param string
		 */
		private function Mails( $string )
		{
			preg_match_all('#[-a-zA-Z_.]+(?:@|\[at\]|\(at\))[-_a-zA-Z.]+(?:\.|\[dot\]|\(dot\))[-_a-zA-Z.]+#',$string,$matches);
 
			$a1 = array('[at]','(at)','[dot]','(dot)');
			$a2 = array('@','@','.','.');
 
			foreach ( $matches[0] as $mail )
			{
				$mail = str_replace($a1,$a2,$mail);
 
				if ( !in_array($mail,$this->aMails) )
				{
					$this->aMails[] = $mail;
				}
			}
		}
 
		/**
		 * Ustala adres strony
		 * @param string adres do konwersji
		 * @return string adres przekonwertowany
		 */
		private function TemporaryURL( $url )
		{
			$url = parse_url($url);
			$url = $url['scheme'] . '://' . $url['host'] . '/';
			return $url;
		}
 
	}
 
 
	$bot = new Bot('http://forum.dogs.pl/misc.php?action=list&order=regdate&page=2', 10, 1);
	$bot -> ShowLinks();
	$bot -> ShowMails();
 
?>
[PHP] pobierz, plaintext 

Niedawno takie cos skleiłem. Wyszuka takze maile z [dot](dot) zamiast kropki i [at](at) zamiast malpy.

Mozemy ustawic aby bot nie szukał maili (zmienna $mail_s = 0 )Nie zrobilem mozliwosci aby bot działał w nieskonczonosc (chodz to bardzo łatwo dorobic).