[BorLase]

вот тут
ereg("[A-Za-z0-9]{1,}\.php",$p1,$lll);

тебе случайно не так надо?
ereg("[A-Za-z0-9]{1,}\.php",$d,$lll);

вообще, лучше всего пройти это все дебаггером или, на крайний случай, поставь вывод отладочной информации - чему у тебя перед if ($lll[0]==$rrr[0]) равны $lll[0], $rrr[0] и т.д.

кроме того, неплохо было бы в вопросе привести пример содержания new.txt