File Coverage

blib/lib/Cache/Funky/Storage.pm
Criterion Covered Total %
statement 12 15 80.0
branch n/a
condition n/a
subroutine 4 7 57.1
pod 3 3 100.0
total 19 25 76.0


line stmt bran cond sub pod time code
1             package Cache::Funky::Storage;
2              
3 1     1   5 use strict;
  1         2  
  1         37  
4 1     1   5 use warnings;
  1         1  
  1         19  
5 1     1   4 use Carp;
  1         1  
  1         73  
6 1     1   4 use base qw( Class::Accessor::Fast );
  1         2  
  1         848  
7              
8 0     0 1   sub get { croak "You need function by get()" }
9 0     0 1   sub set { croak "You need function by set()" }
10 0     0 1   sub delete { croak "You need function by delete()" }
11              
12             1;
13              
14             =head1 NAME
15              
16             Cache::Funky::Storage - Base Class for Cache::Funky::Storage::*
17              
18             =head1 SYNOPSIS
19              
20             package Cache::Funky::Storage::MyStorage;
21              
22             use base qw( Cache::Funky::Storage );
23              
24             =head1 DESCRIPTION
25              
26             When you create Storage class, use base this module.
27              
28             =head1 How to write Storage Class.
29              
30             You must have get ,set ,delete methods for your storage module. Read L then you will get idea.
31              
32             =head1 METHODS
33              
34             =head2 get( $key [ ,$id ] )
35              
36             =head2 set( $key, $value [, $id ] )
37              
38             =head2 delete( $key [ , $id ] )
39              
40             =head1 SEE ALSO
41              
42             L
43              
44             =head1 AUTHOR
45              
46             Masahiro Funakoshi
47              
48             =cut