File Coverage

xt/lib/FatalWarnings.pm
Criterion Covered Total %
statement 7 8 87.5
branch n/a
condition n/a
subroutine 3 4 75.0
pod n/a
total 10 12 83.3


line stmt bran cond sub pod time code
1             package FatalWarnings;
2 240     240   89132 use strict;
  240         1774  
  240         7028  
3 240     240   1089 use warnings;
  240         363  
  240         17686  
4              
5             sub import {
6 0     0   0 $SIG{__WARN__} = sub { die @_ };
  240     240   10375  
7             }
8              
9             1;