$contenido = '<?xml version="1.0" encoding="utf-8"?>
<playlist version="1" xmlns="http://xspf.org/ns/0/">
	<trackList>';
while($file=readdir($dp))
       {
        $extension=getExtension($file);
	      if($extension=="mp3")
	         {
                  $filenames[]=$file;
                }
       }
sort($filenames);
for($i=0;$i<count($filenames);$i++)
    {
     $ruta=$referer."/".$filenames[$i];
     $rolaname=substr($filenames[$i],0,-4);
     $se=sepcade($rolaname);
		 $contenido.='
<track>
<title>'.$se.'</title>
<creator></creator>
<location>'.$ruta.'</location>
</track>';
}

if (is_writable($archivo))
   {
    // En nuestro ejemplo estamos abriendo $nombre_archivo en modo de adición.
    // El apuntador de archivo se encuentra al final del archivo, asi que
    // alli es donde ira $contenido cuando llamemos fwrite().
    if (!$gestor = fopen($archivo, 'wb'))
		     {
          echo "No se puede abrir el archivo ($archivo)";
          exit;
         }
    // Escribir $contenido a nuestro arcivo abierto.
    if (fwrite($gestor, $contenido) === FALSE)
		    {
         echo "No se puede escribir al archivo ($archivo)";
         exit;
        }
		 fclose($gestor);
    }