[Debutant] je ne trouve pas mon erreur !

Salut,

J'ai modifié une routine qui hélas n'est pas une réussite, pourriez vous me
dire si vous voyer une faute car je débute en PHP ?

Voici la routine originel que je veux modifier (elle fonctionne sans PB):
--
if ($fpread) {
$fpwrite = fopen($cache_file, 'w');
if ($fpwrite) {
while (!feof($fpread)) {
$buffer = trim(Chop(fgets($fpread, 512)));

// Version original.
if (($buffer == "<item>") && ($items < $max_items)) {
$title = ltrim(Chop(fgets($fpread, 256)));
$link = ltrim(Chop(fgets($fpread, 256)));
$title = str_replace( "<title>", "", $title );
$title = str_replace( "</title>", "", $title );
$link = str_replace( "<link>", "", $link );
$link = str_replace( "</link>", "", $link );
$look_title=$title;
if ($block) {
if (strlen($title)>$long_chain) {
$title=(substr($title, 0, $long_chain))." ";
}
}
fputs($fpwrite, "$separ<a href=\"$link\"
alt=\"$look_title\" title=\"$look_title\" target=\"$target\">$title</a><br
/>");
$items++;
}
}
fclose($fpwrite);
}
fclose($fpread);
}

--

Et ici la mienne qui plante:
if ($fpread) {
$fpwrite = fopen($cache_file, 'w');
if ($fpwrite) {
while (!feof($fpread)) {
$buffer = trim(Chop(fgets($fpread, 512)));

// Début des modifications.
if (($buffer == "<item>") && ($items < $max_items))
{
while ($buffer != "</item>") {
$buffer = trim(Chop(fgets($fpread, 256)));

if (substr($buffer, 0, 7) == "<title>") then
{
$title = str_replace("<title>", "", $buffer);
$title = str_replace("</title>", "", $title);
}

if (substr($buffer, 0, 6) == "<link>") then
{
$link = str_replace("<link>", "", $buffer);
$link = str_replace("</link>", "", $link);
}
}
// fin des modifications.
$look_title = $title;
if ($block) {
if (strlen($title)>$long_chain) {
$title=(substr($title, 0, $long_chain))." ";
}
}
fputs($fpwrite, "$separ<a href=\"$link\"
alt=\"$look_title\" title=\"$look_title\" target=\"$target\">$title</a><br
/>");
$items++;
}
}
fclose($fpwrite);
}
fclose($fpread);
}


J'ai cherché dans tout les sens mais je ne vois pas ou est mon erreur :-(((

--
Der§en.
Le site du Viking Celtique
http://www.dergen.org