File Coverage

blib/lib/Apache/ASP/Lang/PerlScript.pm
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod 0 2 0.0
total 5 7 71.4


line stmt bran cond sub pod time code
1             package Apache::ASP::Lang::PerlScript;
2              
3             sub new {
4 16     16 0 456     my($class, %args) = shift;
5 16         311     bless \%args, $class;
6             };
7              
8 16     16 0 269 sub CommentStart { '#' };
9              
10             1;
11