>>199
perl知らないけどsha1_base64($key), 0, 12だとDigest値の
先頭9byteしか関係ないって事ですよね?