1 | BEGIN { $| = 1; print "1..72\n"; } |
1 | BEGIN { $| = 1; print "1..71\n"; } |
2 | |
2 | |
3 | # examples from rfc7049 |
3 | # examples from rfc7049 |
4 | |
4 | |
5 | use Data::Dumper; |
5 | use Data::Dumper; |
6 | use CBOR::XS; |
6 | use CBOR::XS; |
… | |
… | |
87 | * 1.1 0xfb3ff199999999999a |
87 | * 1.1 0xfb3ff199999999999a |
88 | < 1.5 0xf93e00 |
88 | < 1.5 0xf93e00 |
89 | < 65504 0xf97bff |
89 | < 65504 0xf97bff |
90 | < 100000 0xfa47c35000 |
90 | < 100000 0xfa47c35000 |
91 | * 3.4028234663852886e+38 0xfa7f7fffff |
91 | * 3.4028234663852886e+38 0xfa7f7fffff |
92 | + 1e+300 0xfb7e37e43c8800759c |
92 | * 1e+300 0xfb7e37e43c8800759c |
93 | 5.960464477539063e-8 0xf90001 |
93 | 5.960464477539063e-8 0xf90001 |
94 | 0.00006103515625 0xf90400 |
94 | 0.00006103515625 0xf90400 |
95 | < -4 0xf9c400 |
95 | < -4 0xf9c400 |
96 | * -4.1 0xfbc010666666666666 |
96 | * -4.1 0xfbc010666666666666 |
97 | Infinity 0xf97c00 |
97 | Infinity 0xf97c00 |