File Coverage

web/cgi-bin/yatt.lib/YATT/Util/redundant_sprintf.pm
Criterion Covered Total %
statement 7 7 100.0
branch 1 2 50.0
condition n/a
subroutine 3 3 100.0
pod n/a
total 11 12 91.6


line stmt bran cond sub pod time code
1             package YATT::Util::redundant_sprintf;
2 12     12   63 use strict;
  12         24  
  12         395  
3 12     12   63 use warnings qw(FATAL all NONFATAL misc);
  12         21  
  12         949  
4              
5             sub import {
6 17 50   17   33313 warnings->unimport(qw/redundant/) if $] >= 5.021002;
7             }
8              
9             1;