sayac

$dosya = fopen("sayi.txt","r");
$dosyaveri=fread($dosya,filesize("sayi.txt"));
echo "";
echo $dosyaveri."";
fclose($dosya);
$dosyaveri=$dosyaveri+1;
$dosya = fopen("sayi.txt","w+");
$sonuc=fwrite($dosya,"$dosyaveri\r\n");
fclose($dosya);