File Coverage

blib/lib/Image/Caa/DitherNone.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 4 0.0
total 18 22 81.8


line stmt bran cond sub pod time code
1             package Image::Caa::DitherNone;
2            
3 2     2   11 use strict;
  2         4  
  2         58  
4 2     2   9 use warnings;
  2         2  
  2         197  
5            
6             sub new {
7 6     6 0 16 my ($class, $args) = @_;
8            
9 6         19 my $self = bless {}, $class;
10            
11 6         45 return $self;
12             }
13            
14 2     2 0 4 sub init {
15             }
16            
17             sub get {
18 16     16 0 42 return 0x80;
19             }
20            
21 4     4 0 18 sub increment {
22             }
23            
24            
25             1;