File Coverage

blib/lib/MooseX/WithCache/KeyGenerator.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             # $Id: KeyGenerator.pm 21415 2008-10-16 07:50:55Z daisuke $
2              
3             package MooseX::WithCache::KeyGenerator;
4 1     1   819 use Moose::Role;
  1         40  
  1         9  
5              
6             requires 'generate';
7              
8 1     1   3380 no Moose::Role;
  1         2  
  1         5  
9              
10             1;
11              
12             __END__
13              
14             =head1 NAME
15              
16             MooseX::WithCache::KeyGenerator - KeyGenerator Role
17              
18             =head1 SYNOPSIS
19              
20             package MyKeyGenerator;
21             use Moose;
22              
23             with 'MooseX::WithCache::KeyGenerator';
24              
25             no Moose;
26              
27             sub generate {
28             my $key = ...;
29             return $key;
30             }
31              
32             =cut