File Coverage

blib/lib/Data/Printer/Filter/OBJECT.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 14 15 93.3


line stmt bran cond sub pod time code
1             package Data::Printer::Filter::OBJECT;
2 35     35   233 use strict;
  35         67  
  35         1444  
3 35     35   206 use warnings;
  35         92  
  35         1851  
4 35     35   213 use Data::Printer::Filter;
  35         70  
  35         343  
5              
6             filter 'OBJECT' => \&parse;
7              
8             sub parse {
9 1     1 0 6 return '(opaque object)';
10             };
11              
12             1;