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.1';
5 5     5   3667 use strict;
  5         15  
  5         160  
6 5     5   25 use warnings;
  5         11  
  5         142  
7              
8 5     5   30 use Moo;
  5         12  
  5         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__