File Coverage

blib/lib/Text/MicroMason/Cache/Null.pm
Criterion Covered Total %
statement 7 8 87.5
branch n/a
condition n/a
subroutine 4 5 80.0
pod 4 4 100.0
total 15 17 88.2


line stmt bran cond sub pod time code
1             package Text::MicroMason::Cache::Null;
2              
3 1     1   732 use strict;
  1         2  
  1         72  
4              
5             ######################################################################
6              
7 1     1 1 7 sub new { my $class = shift; bless { @_ }, $class }
  1         6  
8              
9 109     109 1 215 sub get { return }
10              
11 109     109 1 1100 sub set { return $_[2] }
12              
13 0     0 1   sub clear { return }
14              
15             ######################################################################
16              
17             1;
18              
19             __END__