use Cvs;

my $cvs = new Cvs
(
    '/common/project/CVSROOT',
    cvsroot => ':pserver:test@cvs.com:/cvs',
    password => 'secret'
) or die $Cvs::ERROR;

my $status = $cvs->status('/home/test1/trunk/build.xml');
print $status;
if($status->is_modified)
{
    print "moddified";
}
else
{
    print "unmodified";
}
[download]

I have installed the cvs module . When i tryh to run this script it gives me the following error.

Can't locate object method "is_modified" via package "Cvs::Result::Bas
+e" at find_conflicts.pl line 24.
[download]

But cpan has stated to use it in this way. Please let me know any other issue.