File Coverage

blib/lib/WWW/Snooze/Serialize.pm

Criterion	Covered	Total	%
statement	9	15	60.0
branch			n/a
condition			n/a
subroutine	3	7	42.8
pod	5	5	100.0
total	17	27	62.9

package WWW::Snooze::Serialize;

use strict;
use warnings;

sub new {
    my $class = shift;
    my %args = @_;

    bless {
        extension => '',
        content_type => '',
        %args
    }, $class;
}

sub encode { return {}; }
sub decode { return {}; }

sub content_type { shift->{content_type}; }

sub extension {
    my $ext = shift->{extension};
    $ext =~ s/^(\w+)$/.$1/;
    return $ext;
}

1;
=head1 NAME

WWW::Snooze::Serialize - Base object for building serializers

=head1 METHODS


=head2 new(%args)

=over 4

=item extension

Set filename extension

=item content_type

Set MIME type on request

=back


=head2 encode()

=head2 decode()

Functions for overriding encoding and decoding of request/response data


=head2 extension()

Return the extension, prepended with '.'


=head1 AUTHOR

Anthony Johnson [e-mail]

=cut