File Coverage

blib/lib/Bubblegum/Wrapper/Yaml.pm
Criterion Covered Total %
statement 7 9 77.7
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 12 83.3


line stmt bran cond sub pod time code
1             # ABSTRACT: Bubblegum Wrapper around YAML Serialization
2             package Bubblegum::Wrapper::Yaml;
3              
4 1     1   325 use 5.10.0;
  1         2  
  1         33  
5 1     1   457 use namespace::autoclean;
  1         17744  
  1         8  
6              
7 1     1   543 use Bubblegum::Class;
  0            
  0            
8             use Class::Load 'load_class';
9              
10             extends 'Bubblegum::Object::Instance';
11              
12             our $VERSION = '0.40'; # VERSION
13              
14             sub decode {
15             my $self = shift;
16             my $yaml = load_class('YAML::Tiny', {-version => 1.56})->new;
17             return $yaml->read_string($self->data);
18             }
19              
20             sub encode {
21             my $self = shift;
22             my $yaml = load_class('YAML::Tiny', {-version => 1.56})->new;
23              
24             $yaml->[0] = $self->data; # hack
25             return $yaml->write_string($self->data);
26             }
27              
28             1;
29              
30             __END__