где взять PR

pagerank.pp.ru

ищешь "google checksum calculator"

он будет выдавать число в зависимости от строки

типа шифровать......

далее запрос вида:

http://www.google.com/search?client=navclient-auto&ch="checksum"&features=Rank&q=info:"www.site.com"

а вообще скажи почту я тебе скину.....

Попробовал пойти таким путем, получаю "403 Forbidden

Your client does not have permission to get URL".

Код калькулятора взял здесь: http://blog.outer-court.com/archive/2004_06_27_index.html#108834386239051706

Не подскажете в чем тут беда?

Стыдно товарищу оптимизатору не уметь пользоваться поиском. Вот большая ветка:

Здесь есть работоспособный пример.

Чегой-то у меня тот работоспособный тоже не спасал. А заработал вот этот:

define('GOOGLE_MAGIC', 0xE6359A60);



function zeroFill($a, $b) {

	$z = hexdec(80000000);

	if ($z & $a) {

		$a = ($a>>1);

		$a &= (~$z);

		$a |= 0x40000000;

		$a = ($a>>($b-1));

	}

	else {

		$a = ($a>>$b);

	}

	return $a;

}



function mix($a,$b,$c) {

	$a -= $b; $a -= $c; $a ^= (zeroFill($c,13));

	$b -= $c; $b -= $a; $b ^= ($a<<8);

	$c -= $a; $c -= $b; $c ^= (zeroFill($b,13));

	$a -= $b; $a -= $c; $a ^= (zeroFill($c,12));

	$b -= $c; $b -= $a; $b ^= ($a<<16);

	$c -= $a; $c -= $b; $c ^= (zeroFill($b,5));

	$a -= $b; $a -= $c; $a ^= (zeroFill($c,3));

	$b -= $c; $b -= $a; $b ^= ($a<<10);

	$c -= $a; $c -= $b; $c ^= (zeroFill($b,15));

	return array($a,$b,$c);

}



function GoogleCH($url, $length=null, $init=GOOGLE_MAGIC) {

	if(is_null($length)) {

		$length = sizeof($url);

	}

	$a = $b = 0x9E3779B9;

	$c = $init;

	$k = 0;

	$len = $length;

	while($len >= 12) {

		$a += ($url[$k+0] +($url[$k+1]<<8) +($url[$k+2]<<16) +($url[$k+3]<<24));

		$b += ($url[$k+4] +($url[$k+5]<<8) +($url[$k+6]<<16) +($url[$k+7]<<24));

		$c += ($url[$k+8] +($url[$k+9]<<8) +($url[$k+10]<<16)+($url[$k+11]<<24));

		$mix = mix($a,$b,$c);

		$a = $mix[0]; $b = $mix[1]; $c = $mix[2];

		$k += 12;

		$len -= 12;

	}

	$c += $length; {

		case 11: $c+=($url[$k+10]<<24);

		case 10: $c+=($url[$k+9]<<16);

		case 9 : $c+=($url[$k+8]<<8);

		case 8 : $b+=($url[$k+7]<<24);

		case 7 : $b+=($url[$k+6]<<16);

		case 6 : $b+=($url[$k+5]<<8);

		case 5 : $b+=($url[$k+4]);

		case 4 : $a+=($url[$k+3]<<24);

		case 3 : $a+=($url[$k+2]<<16);

		case 2 : $a+=($url[$k+1]<<8);

		case 1 : $a+=($url[$k+0]);

	}

	$mix = mix($a,$b,$c);

	return $mix[2];

}



function strord($string) {

	for($i=0;$i<strlen($string);$i++) {

		$result[$i] = ord($string{$i});

	}

	return $result;

}



function get_pr($url) {

	$result=array("",-1);

	if (($url.""!="")&&($url.""!="http://")):

		if (substr(strtolower($url),0,7)!="http://"):

			$url="http://".$url;

		endif;

		$url="info:".$url;

		$checksum=GoogleCH(strord($url));

		$google_url=sprintf("http://www.google.com/search?client=navclient-auto&ch=6%u&features=Rank&q=".$url,$checksum);

		$contents="";

		if ($handle=fopen($google_url,"rb")):

			while(true):

				$data=fread($handle,8192);

				if (strlen($data)==0):

					break;

				endif;

				$contents.=$data;

			endwhile;

			fclose($handle);

		else:

			$contents="Connection unavailable";

		endif;

		$p=explode(":",$contents);

			if (isset($p[2])):

				$result=$p[2];

			endif;

	endif;

	return $result;

}



$pr=get_pr($_GET["url"]);

$output=$pr[0];

$pagerank=$pr[1];

никто не встречал чего-то подобного, но на перле?