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.4.0';
5 6     6   4402 use strict;
  6         14  
  6         175  
6 6     6   29 use warnings;
  6         13  
  6         143  
7              
8 6     6   30 use Moo;
  6         9  
  6         34  
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__