ぶっくまーくかんり（３）WSSE認証・サンプルスクリプト

続いてサンプルコードを読んでみる。

my $nonce = sha1(sha1(time() . {} . rand() . $$));

うーん。{}って何だろう。無名ハッシュのリファレンスを文字列化しただけ？

$ perl -e 'print {}'
HASH(0x10010ee8)

うーん。まあいっか。次。

my $now = DateTime->now->iso8601 . 'Z';

うーん。iso8601って何だろう。
http://www.w3.org/TR/NOTE-datetime

Complete date plus hours, minutes, seconds and a decimal fraction of a second
YYYY-MM-DDThh:mm:ss.sTZD (eg 1997-07-16T19:20:30.45+01:00)

なるほど。で、後は下の説明どおりエンコードしてヘッダー作ってリクエストを送信すればOKってことね。