cover -delete
HARNESS_PERL_SWITCHES=-MDevel::Cover perl ./Build test
cover

##</code><code>##

#!/bin/bash
if [ -f Build.PL ]; then
    makecommand="perl ./Build"
elif [ -f Makefile.PL ]; then
    makecommand=make
else
    echo Cannot generate coverage information from this directory!
    exit 1
fi
cover -delete; HARNESS_PERL_SWITCHES=-MDevel::Cover $makecommand test; cover