File Coverage

blib/lib/Win32/Mock.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Win32::Mock;
2 14     14   182042 use strict;
  14         258  
  14         599  
3 14     14   79 use warnings;
  14         33  
  14         581  
4 14     14   91 use File::Basename;
  14         24  
  14         2153  
5 14     14   20471 use Devel::FakeOSName "Win32/\u$^O";
  14         4946  
  14         128  
6              
7             {
8 14     14   11524 no strict "vars";
  14         33  
  14         3658  
9             $VERSION = '0.05';
10             unshift @INC, dirname($INC{"Win32/Mock.pm"}) . "/Mock";
11             }
12              
13             1
14              
15             __END__