| 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 |
