hash, json и memcached

AK666 02.12.2013 15:46 / 02.12.2013 15:53

достаем данные из БД преобразовываем в json и кладем в memcached

 $UIN[user]
 $lSQL[SELECT UIN, passwd, ID, UIN FROM UIN_auth WHERE UIN = _utf8'$UIN']

 ^db{$userData[^hash::sql{$lSQL}$.limit(1)]]}

  $str[^json:string[$userData]]

  ^mem_put[auth-$UIN;$str]

данные нормально достались и положились в мемкешед:

# memcat --servers memcached.local auth-user
"{\n\"user\":{\n\"passwd\":\"$apr1$E0WSCfmZ$ryIevdy4OikQIh1FL7Kkb1\",\n\"ID\":\"6\",\n\"UIN\":\"user\"\n}\n}"

теперь достаем данные:

	$memData[^mem_get[auth-$UIN]]
	^log[memcached.GET: auth-$UIN = $memData]

  ^if(def $memData && ^memData.length[] >0){
	^log[memcached.parse: $memData (^memData.length[])]
	$userData[^json:parse[$memData;$.double(false)$.distinct[first]$.taint[as-is]]]
  }

и тут json:parse вылетает в exception: unexpected char at byte 0

полученные данные из memcached в переменную $memData:

"{\n\"user\":{\n\"passwd\":\"$apr1$E0WSCfmZ$ryIevdy4OikQIh1FL7Kkb1\",\n\"ID\":\"6\",\n\"UIN\":\"user\"\n}\n}"

---