YANICK / File-Serialize-1.5.1 / lib / File / Serialize / Serializer / YAML / Tiny.pm 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
—
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73

              
package File::Serialize::Serializer::YAML::Tiny;
our $AUTHORITY = 'cpan:YANICK';
#ABSTRACT: YAML::Tiny serializer for File::Serialize
$File::Serialize::Serializer::YAML::Tiny::VERSION = '1.5.1';
use strict;
use warnings;
use Moo;
with 'File::Serialize::Serializer';
sub extensions { qw/ yml yaml / };
sub serialize {
    my( $self, $data, $options ) = @_;
    YAML::Tiny->new($data)->write_string
}
sub deserialize {
    my( $self, $data, $options ) = @_;
    YAML::Tiny->new->read_string($data)->[0];
}
1;
__END__
=pod
=encoding UTF-8
=head1 NAME
File::Serialize::Serializer::YAML::Tiny - YAML::Tiny serializer for File::Serialize
=head1 VERSION
version 1.5.1
=head1 DESCRIPTION
=over
=item B<extensions>
C<yaml>, C<yml>.
=item B<precedence>
100
=item B<module used>
L<YAML::Tiny>
=item B<supported options>
none
=back
=head1 AUTHOR
Yanick Champoux <yanick@cpan.org>
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2021, 2019, 2017, 2016, 2015 by Yanick Champoux.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut