File Coverage

lib/Perlmazing/Perlmazing/Precompile/is_filehandle.pm
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 10 100.0


line stmt bran cond sub pod time code
1 50     50   445 use Perlmazing;
  50         121  
  50         273  
2 50     50   368 use Scalar::Util 'openhandle';
  50         107  
  50         5302  
3            
4             sub main ($) {
5 23     23   12712 openhandle $_[0];
6             }