File: modperl_extra.pl

package info (click to toggle)
libapache-ssllookup-perl 2.00-04-4
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 212 kB
  • sloc: perl: 209; ansic: 10; makefile: 9; sh: 5
file content (21 lines) | stat: -rwxr-xr-x 577 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
# this is equivalent to your startup.pl.
# it does not need to contain anything unless
# startup.pl behavior is a required part of your module

if ($ENV{HARNESS_PERL_SWITCHES}) {

  eval {
    # 0.48 is the first version of Devel::Cover that can
    # really generate mod_perl coverage statistics
    require Devel::Cover;
    Devel::Cover->VERSION(0.48);

    # this ignores coverage data for some generated files
    # you may need to adjust this slightly for your config
    Devel::Cover->import('+inc' => 't/response/',);

    1;
  } or die "Devel::Cover error: $@";
}

1;