File Coverage

blib/lib/File/Serialize/Serializer/XML/Simple.pm
Criterion Covered Total %
statement 9 10 90.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 15 86.6


line stmt bran cond sub pod time code
1             package File::Serialize::Serializer::XML::Simple;
2             our $AUTHORITY = 'cpan:YANICK';
3             #ABSTRACT: XML::Simple serializer for File::Serialize
4             $File::Serialize::Serializer::XML::Simple::VERSION = '1.5.0';
5 6     6   4427 use strict;
  6         12  
  6         166  
6 6     6   31 use warnings;
  6         11  
  6         158  
7              
8 6     6   27 use Moo;
  6         23  
  6         30  
9             with 'File::Serialize::Serializer';
10              
11 0     0 1   sub extensions { qw/ xml / };
12              
13             sub serialize {
14             my( $self, $data, $options ) = @_;
15             XML::Simple->new->XMLout($data);
16             }
17              
18              
19             sub deserialize {
20             my( $self, $data, $options ) = @_;
21             XML::Simple->new->XMLin($data);
22             }
23              
24             1;
25              
26             __END__