Простой счётчик без БД. Что я не так делаю?!

reklamist 11.03.2017 15:34

Два часа смотрю на код - не вижу ошибки.

Задачей было быстро и просто считать источники посещений по get-запросам вида http://domain.ru?iamfrom=otteda

^form:fields.foreach[field;value]{^if($field eq 'iamfrom'){
$was(^if(-f '/0counters/${value}.txt'){$getnumber[^file::load[text;/0counters/${value}.txt]]$getnumber.text}{0})
$was($was+1)
$turned[$was]
^turned.save[/0counters/${value}.txt]
}}

Файлы типа /0counters/otteda.txt с единичкой внутри исправно появляются, но не инкрементируются - то ли условие ^if(-f '/0counters/${value}.txt') выполняется всегда отрицательно, то ли $getnumber.text не даёт текста файла ^file::load[text;/0counters/${value}.txt].

Wazzup?! :(

---