File Coverage

blib/lib/DTL/Fast/Filter/Safe.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 20 21 95.2


line stmt bran cond sub pod time code
1             package DTL::Fast::Filter::Safe;
2 13     13   5282 use strict;
  13         28  
  13         312  
3 13     13   64 use utf8;
  13         25  
  13         62  
4 13     13   277 use warnings FATAL => 'all';
  13         24  
  13         418  
5 13     13   62 use parent 'DTL::Fast::Filter';
  13         22  
  13         67  
6              
7             $DTL::Fast::FILTER_HANDLERS{safe} = __PACKAGE__;
8              
9             #@Override
10             sub filter
11             {
12 37     37 0 61 shift;
13              
14 37         63 shift->{safe} = 1;
15              
16 37         127 return shift;
17             }
18              
19             1;