File Coverage

blib/lib/Acme/Code/Police.pm
Criterion Covered Total %
statement 1 2 50.0
branch 1 2 50.0
condition n/a
subroutine 1 1 100.0
pod n/a
total 3 5 60.0


line stmt bran cond sub pod time code
1             package Acme::Code::Police;
2              
3 2 50   2   17 INIT{unless(exists$INC{'strict.pm'}){unlink((caller)[1])}}
  0            
4              
5             $trick_that_naughty_cpants_thingy_into_thinking_I_use_strict = <<'Ha, ha!';
6             use strict;
7             Ha, ha!
8              
9             $Acme::Code::Police::VERSION = 2.18281;
10              
11             "Ovid";
12             __END__