| … | |
… | |
| 64 | |
64 | |
| 65 | package CBOR::XS; |
65 | package CBOR::XS; |
| 66 | |
66 | |
| 67 | use common::sense; |
67 | use common::sense; |
| 68 | |
68 | |
| 69 | our $VERSION = 1.3; |
69 | our $VERSION = 1.4; |
| 70 | our @ISA = qw(Exporter); |
70 | our @ISA = qw(Exporter); |
| 71 | |
71 | |
| 72 | our @EXPORT = qw(encode_cbor decode_cbor); |
72 | our @EXPORT = qw(encode_cbor decode_cbor); |
| 73 | |
73 | |
| 74 | use Exporter; |
74 | use Exporter; |
| … | |
… | |
| 814 | |
814 | |
| 815 | These tags are automatically created (and decoded) for serialisable |
815 | These tags are automatically created (and decoded) for serialisable |
| 816 | objects using the C<FREEZE/THAW> methods (the L<Types::Serialier> object |
816 | objects using the C<FREEZE/THAW> methods (the L<Types::Serialier> object |
| 817 | serialisation protocol). See L<OBJECT SERIALISATION> for details. |
817 | serialisation protocol). See L<OBJECT SERIALISATION> for details. |
| 818 | |
818 | |
| 819 | =item 28, 29 (shareable, sharedref, L <http://cbor.schmorp.de/value-sharing>) |
819 | =item 28, 29 (shareable, sharedref, L<http://cbor.schmorp.de/value-sharing>) |
| 820 | |
820 | |
| 821 | These tags are automatically decoded when encountered (and they do not |
821 | These tags are automatically decoded when encountered (and they do not |
| 822 | result in a cyclic data structure, see C<allow_cycles>), resulting in |
822 | result in a cyclic data structure, see C<allow_cycles>), resulting in |
| 823 | shared values in the decoded object. They are only encoded, however, when |
823 | shared values in the decoded object. They are only encoded, however, when |
| 824 | C<allow_sharing> is enabled. |
824 | C<allow_sharing> is enabled. |
| … | |
… | |
| 834 | will be shared, others will not. While non-reference shared values can be |
834 | will be shared, others will not. While non-reference shared values can be |
| 835 | generated in Perl with some effort, they were considered too unimportant |
835 | generated in Perl with some effort, they were considered too unimportant |
| 836 | to be supported in the encoder. The decoder, however, will decode these |
836 | to be supported in the encoder. The decoder, however, will decode these |
| 837 | values as shared values. |
837 | values as shared values. |
| 838 | |
838 | |
| 839 | =item 256, 25 (stringref-namespace, stringref, L <http://cbor.schmorp.de/stringref>) |
839 | =item 256, 25 (stringref-namespace, stringref, L<http://cbor.schmorp.de/stringref>) |
| 840 | |
840 | |
| 841 | These tags are automatically decoded when encountered. They are only |
841 | These tags are automatically decoded when encountered. They are only |
| 842 | encoded, however, when C<pack_strings> is enabled. |
842 | encoded, however, when C<pack_strings> is enabled. |
| 843 | |
843 | |
| 844 | =item 22098 (indirection, L<http://cbor.schmorp.de/indirection>) |
844 | =item 22098 (indirection, L<http://cbor.schmorp.de/indirection>) |
| … | |
… | |
| 1058 | # Time::Piece::Strptime uses the "incredibly flexible date parsing routine" |
1058 | # Time::Piece::Strptime uses the "incredibly flexible date parsing routine" |
| 1059 | # from FreeBSD, which can't parse ISO 8601, RFC3339, RFC4287 or much of anything |
1059 | # from FreeBSD, which can't parse ISO 8601, RFC3339, RFC4287 or much of anything |
| 1060 | # else either. Whats incredibe over standard strptime totally escapes me. |
1060 | # else either. Whats incredibe over standard strptime totally escapes me. |
| 1061 | # doesn't do fractional times, either. sigh. |
1061 | # doesn't do fractional times, either. sigh. |
| 1062 | # In fact, it's all a lie, it uses whatever strptime it wants, and of course, |
1062 | # In fact, it's all a lie, it uses whatever strptime it wants, and of course, |
| 1063 | # they are all incomptible. The openbsd one simply ignores %z (but according to the |
1063 | # they are all incompatible. The openbsd one simply ignores %z (but according to the |
| 1064 | # docs, it would be much more incredibly flexible indeed. If it worked, that is.). |
1064 | # docs, it would be much more incredibly flexible indeed. If it worked, that is.). |
| 1065 | scalar eval { |
1065 | scalar eval { |
| 1066 | my $s = $_[1]; |
1066 | my $s = $_[1]; |
| 1067 | |
1067 | |
| 1068 | $s =~ s/Z$/+00:00/; |
1068 | $s =~ s/Z$/+00:00/; |
