unknownplace.org

JSON-Types-0.01 - variable type utility for JSON encoding - metacpan.org

Perl から JSON 吐くときに、ここは絶対数値で（文字列で）だしたい、みたいなときに

use JSON;

print encode_json({
    number => $num + 0,
    string => $str . '',
    bool   => $bool ? \1 : \0,
});

みたいにすることがあるかもしれませんが、これってやっぱりハックなので可読性悪いしわかりにくいってことで、

use JSON;
use JSON::Types;

print encode_json({
    number => number $num,
    string => string $str,
    bool   => bool $bool,
});

みたいな感じで、まぁ内部的にやってることは同じなのですが可読性を上げていこう！というような趣旨のモジュールです。

追伸： Acme::Hidek のリリースで hidek さんの誕生日を知りました。おめでとうございます！