Просмотр файла sbor/scan.php

Размер файла: 504B
<?php
Error_Reporting(E_ALL & ~E_NOTICE);
$arr=array();
for($m=7;$m<=490;$m+=7){
@$f=file("http://mag.su/fotolist.php?next=$m&sort=time&t=2-128");
$cnt=count($f);
for($i=0;$i<=$cnt;$i++)
{$str=$f[$i]; 
preg_match("#show.php\?f=([^&]*)#is", $str, $out);
$zap=$out[1];
if(preg_match ('|^[a-z09\._-]|',$zap)){
array_push($arr,$zap);}	
}	
}
$gr=array_unique($arr);
$cntp=count($gr);
for($g=0;$g<=$cntp;$g++){
$fl=fopen("spamlist.txt","a+");fwrite($fl,$gr[$g]."\n");fclose($fl);
}
exit;
?>