Оцените скрипт парсинга

Оцените скрипт парсинга (не цену, а как написан скрипт)

<?php

//парсер сайта http://znachenie.ru/znachenie_familii/letter/1

$max[1] = 18;

$max[2] = 24;

$max[3] = 17;

$max[4] = 19;

$max[5] = 15;

$max[6] = 9;

$max[7] = 4;

$max[8] = 8;

$max[9] = 6;

$max[10] = 42;

$max[11] = 16;

$max[12] = 27;

$max[13] = 13;

$max[14] = 10;

$max[15] = 29;

$max[16] = 12;

$max[17] = 38;

$max[18] = 21;

$max[19] = 5;

$max[20] = 11;

$max[21] = 8;

$max[22] = 3;

$max[23] = 13;

$max[24] = 14;

$max[25] = 3;

$max[26] = 1;

$max[27] = 3;

$max[28] = 6;



//создаём файл, в который будем сохранять фамилии и их значение

$file = fopen ("fam.txt", "w");



for ($i=1;$i<=28;$i++) 

	{

	for ($j=1;$j<=$max[$i];$j++) 

		{

		//скачиваем список фамилий

		$list = file_get_contents ("http://znachenie.ru/znachenie_familii/letter/$i/$j");

		//парсим список фамилий

		$k=strpos($list, 'padding-right: 50px;">') + strlen ('padding-right: 50px;">');

		//вырезаем из всей страницы со списком фамилий, только ссылки на фамилии

		$list = substr($list, $k, strpos ($list, "</div>", $k)-$k);

		//в цикле ищем ссылки на фамилии и сами фамилии

		$k = 0;

			do

			{

			//ищем ссылку на фамилию

			$k=strpos($list, '<a href="', $k) + strlen ('<a href="');

			$t=strpos($list, '"', $k);

			//link - ссылка на фамилию

			$link = substr($list, $k, $t-$k);

			//ищем фамилию

			$k = $t+2;

			$t=strpos($list, '<', $k);

			//fam - фамилия

			$fam = substr ($list, $k, $t-$k);

			

			//скачиваем страницу, на которой написано значение фамилии

			$znach = file_get_contents ("http://znachenie.ru$link");

			//ищем значение фамилии

			$k1=strpos($znach, '<div style="float: left; padding-right: 10px;">') + strlen ('<div style="float: left; padding-right: 10px;">');

			$k1=strpos($znach, '</div>', $k1) + strlen ('</div>');

			$t=strpos($znach, "<br><br>", $k1);

			//znach_fam - значение фамилии (заодно убираем пустые строки)

			$znach_fam = trim(preg_replace("/[\r\n]+/m", "", substr($znach, $k1, $t-$k1)));

			//echo "ссылка на фамилию: $link, фамилия: $fam, значение фамилии: $znach_fam<br><br><br>";

			

			//записываем данные в файл

			fputs ($file, "$fam@$znach_fam\r\n");

			

			}

			while (strpos($list, '<a href="', $k) != "");

			//exit;

		}

	}

fclose ($file);



echo "Done";

?>