perl ファイルでサブルーチン カバレッジのみが必要です。したがって、メインファイルに次のステートメントを挿入しました。
mainfile.pl
use Devel::Cover::Subroutine;
mainfile.pl を実行すると、次のエラーが表示されます。
Devel::Cover: Writing coverage database to /home/devel1/Devel-Cover-0.78/examples1/cover_db/runs/1319109459.10082.56199
Can't find digest for mainfile.pl at /opt/perl_32/lib/site_perl/5.8.8/IA64.ARCHREV_0-thread-multi/Devel/Cover/DB/Structure.pm line 282.
Devel::Cover: Can't find digest for mainfile.pl
--------------------------------------------------------------- ------ ------
File sub total
--------------------------------------------------------------- ------ ------
Total n/a n/a
--------------------------------------------------------------- ------ ------
このエラーを解決するにはどうすればよいですか? しかし、私が使用すると、use Devel::Cover;それは正常に機能します。