Here a patch for what I just say ...
HTH,
--
Alain BARBET
diff -ru Devel-Cover-0.20-old/BUGS Devel-Cover-0.20/BUGS
--- Devel-Cover-0.20-old/BUGS Sat Oct 5 19:16:10 2002
+++ Devel-Cover-0.20/BUGS Wed Jul 30 11:29:07 2003
@@ -1,2 +1,6 @@
- Code in BEGIN and END blocks is not reported.
- Doesn't play nicely with Perl's testsuite.
+- Sometimes (!), cover_db database will be dropped
+- If you have chdir call in your test, you need to
+use an absolute path for cover db, else you will
+have several database.
diff -ru Devel-Cover-0.20-old/cover Devel-Cover-0.20/cover
--- Devel-Cover-0.20-old/cover Sat Oct 5 19:16:10 2002
+++ Devel-Cover-0.20/cover Wed Jul 30 11:30:07 2003
@@ -157,6 +157,7 @@
-file filename - only report on the file (default all)
-write [db] - write the merged database (default off)
+ -delete - drop selected cover database
-coverage criterion - report on criterion (default all available)
diff -ru Devel-Cover-0.20-old/lib/Devel/Cover.pm Devel-Cover-0.20/lib/Devel/Cover.pm
--- Devel-Cover-0.20-old/lib/Devel/Cover.pm Sat Oct 5 19:16:10 2002
+++ Devel-Cover-0.20/lib/Devel/Cover.pm Wed Jul 30 11:42:38 2003
@@ -571,6 +571,10 @@
perl -MDevel::Cover=-db,cover_db,-coverage,statement,time yourprog args
+ # of for a CPAN module
+ export HARNESS_PERL_SWITCHES="-MDevel::Cover=-ignore,t/,-select,blib/lib"
+ make test
+
=head1 DESCRIPTION
This module provides code coverage metrics for Perl.
@@ -604,7 +608,7 @@
Requirements:
- Perl 5.6.1 or 5.7.1.
+ Perl 5.6.1 or greater.
The ability to compile XS extensions.
Pod::Coverage if you want pod coverage.
Template Toolkit 2 if you want HTML output.
@@ -612,7 +616,10 @@
=head1 OPTIONS
-coverage criterion - Turn on coverage for the specified criterion.
- -db cover_db - Store results in coverage db (default cover_db).
+ Criterion can be in: all, none, statement, branch,
+ condition, default all)
+ -db cover_db - Store results in coverage db (default cover_db
+ in current directory).
-inc path - Set prefixes of files to ignore (default @INC).
+inc path - Append to prefixes of files to ignore.
-ignore RE - Ignore files matching RE.
@@ -640,6 +647,7 @@
=head1 BUGS
Did I mention that this is alpha code?
+See the BUGS file.
=head1 VERSION