@MSGID: 2:5036/26 64d24e00
@CHRS: CP866 2
@TID: hpt/w32-mvcdll 1.9.0-cur 27-02-03
Рад всех приветствовать! А особенно - All!

Если написать что-то вроде

my $f = 4.0;
my $j = JSON::encode_json({
    object => {
        value => $f,
    }
});
print "j: ", $j;

, то получим:

j: {"object":{"value":4}}

, т.е., незначащие нули усеклись. А как их сохранить?

... Jonny wanna live
--- GoldED+/W32 1.1.5-041013     xenofont.chat.ru         skype pastuhovgena
 * Origin: Тяжело в лечении - легко в гробу (2:5036/26)
SEEN-BY: 50/109 250/25 301/1 341/66 450/1024 451/31
463/68 467/888 4500/1
SEEN-BY: 5000/111 5001/100 5005/49 5010/352 5015/42
46 5020/113 545 620 715
SEEN-BY: 5020/828 830 846 848 1042 4441 12000
5022/128 5030/49 115 500 1081
SEEN-BY: 5036/26 5049/1 162 5053/51 5054/89
5058/104 5059/37 5061/133 5066/18
SEEN-BY: 5080/102 5083/1 444 6090/1
@PATH: 5036/26 5020/1042 4441