Я хочу только подпрограмму покрытия в моем файле 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;, он работает правильно.