Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: Setting Devel::Cover options for a web application

by chargrill (Parson)
on Feb 14, 2007 at 19:11 UTC ( #600044=note: print w/replies, xml ) Need Help??

in reply to Setting Devel::Cover options for a web application

I tend to use a Makefile* for running coverage reports. Here's a relevant snippet:

OPENCMD = open BROWSER = /Applications/ clean: cover -delete test: prove cover: make clean PERL5OPT=-MDevel::Cover=+ignore,.*\.t,-ignore,prove make test 2>&1 cover make report report: $(OPENCMD) $(BROWSER) cover_db/coverage.html

Customized a bit for a Mac, but the relevant parts are the PERL5OPTS ENV I'm setting, which points out how to ignore things using -ignore and +ignore - as long as you know the syntax it's expecting, the docs should clear things up. In a nutshell, I'm telling Devel::Cover to ignore my .t files, as well as the prove utility. Fascinating yes, but like you, that's not what I really care about :)

You don't necessarily need a Makefile for this, simply typing the following into an appropriate command line** will work***, too:

$ PERL5OPT=-MDevel::Cover=+ignore,.*\.t,-ignore,prove prove

Update: changed the PERL5OPT line a bit, added a little more explanation.

* I'm not great with Makefiles, but the above works for me.

** i.e. some unixish shell, other OSes may not let you specify environment variables like that.

*** assuming your test files are in `cwd` and named *.t.

s**lil*; $*=join'',sort split q**; s;.*;grr; &&s+(.(.)).+$2$1+; $; = qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)

Replies are listed 'Best First'.
Re^2: Setting Devel::Cover options for a web application
by talexb (Canon) on Feb 14, 2007 at 19:33 UTC

    Outstanding! I changed the httpd.conf line to

    SetEnv PERL5OPT "-MDevel::Cover=-dir,/opt/FES/data"

    And it Just Worked. The time before that, I had a space instead of the comma. Crazy stuff, man. I think I'm gonna write to the author and pass that along. Thanks again!

    Alex / talexb / Toronto

    "Groklaw is the open-source mentality applied to legal research" ~ Linus Torvalds

      I'd suggest another addition to your httpd.conf:

      <IfDefine COVERAGE> SetEnv PERL5OPT "-MDevel::Cover=-dir,/opt/FES/data" </IfDefine>

      Add a new section in your apachectl (or however you launch apache):

      startcover() { echo -n $"Starting apache with code coverage: " $http_bin $other_options -DCOVERAGE }

      Adjusting where necessary for different apachectl's (ours is heavily customized, but anyone reasonably familiar with apache administration ought to be able to take it from here).

      And then just invoke it thusly:

      $ apachectl startcover

      s**lil*; $*=join'',sort split q**; s;.*;grr; &&s+(.(.)).+$2$1+; $; = qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)
Re^2: Setting Devel::Cover options for a web application
by bimleshsharma (Beadle) on Dec 18, 2014 at 09:43 UTC
    Hi , I know you have done this long back am sure you have great experience on this. So it would be great if you help me in one of application to get coverage. We have web application (apache) run thru xsp files, that xsp file made with perl code so finally we need to find code on perl application. I insatalled Devel::Cover and added 'use Devel::Cover' in all xsp file. Ran application for functionality test. I can see cover_db dir and structure & run folder , aswellas digest file (with proper details) but we i run command 'Cover' then i am not getting coverage properly, getting n/a for all type of coverage. I am not sure where we are going wrong, pls help .

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://600044]
[karlgoethebier]: https://de. wiki/Bembel#/ media/File: Bembel_Zum_blauen_ Bock_1978.jpg
[choroba]: as my friend says, Ich stehe Deutsche ver nicht aber klein ;-)
[Corion]: Krug is generic pottery ware for pouring beverages, but a Bembel is painted with that blue paint and contains only (!) Apfelwein
[shmem]: Corion: alas, air too.
[Corion]: shmem: Yes, very sad!
[choroba]: doesn't sound much useful, which means I'll probably remember it
[karlgoethebier]: "that blue pain" == Salzglasur as far as i remember
[karlgoethebier]: Paint!
[shmem]: karlgoethebier the blue pain comes after all bembels are empty

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (13)
As of 2017-05-24 08:52 GMT
Find Nodes?
    Voting Booth?