File Coverage

blib/lib/SQ.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 19 19 100.0


line stmt bran cond sub pod time code
1             package SQ;
2             $SQ::VERSION = '0.0.6';
3 1     1   70055 use strict;
  1         11  
  1         30  
4 1     1   5 use warnings;
  1         1  
  1         25  
5              
6 1     1   25 use 5.008;
  1         3  
7              
8              
9 1     1   5 use Exporter 5.57 'import';
  1         25  
  1         48  
10              
11 1     1   6 use vars (qw( @EXPORT $S));
  1         2  
  1         96  
12              
13             @EXPORT = (qw($S));
14              
15             $S = q#'#;
16              
17             1;
18              
19             __END__