为什么`Cvs` CPAN模块无法正确识别已签出文件的状态？

Question

为什么CPAN模块(perl5.8，Cvs module version0.06)不能正确识别已经签出的文件的状态？

$ echo $CVSROOT
:pserver:MYUSER@pserver.COMPANY.com:/u1/cvs_root

$ cvs co dev/script1.pl
U dev/script1.pl

$ cvs status dev/script1.pl | grep Status
File: script1.pl          Status: Up-to-date

$ cat cvs.pl

use Cvs; 
my $cvs = new Cvs("/u1/cvs_root",cvsroot => $ENV{CVSROOT}, password =>"****")
     or die $Cvs::ERROR; 
my $status = $cvs->status("dev/script1.pl"); 
print "STATUS: " . $status->status() . "\n"'

$ ./cvs.pl
STATUS: Needs Checkout

"Needs“是CVS为尚未签出的有效CVS文件返回的状态。怎么回事？

Answer 1

cvs 0.06是一个真正的(超过8年)的模块。即使是0.07版本也有近8年的历史。

我自己不使用cvs，但我可以想象这样一个老模块会有很多问题……