foreach my $f (@state2) {
        print "File is $f\n"; # swap this with cvs co command
        `cvs co $f`;
    }

##</code><code>##

$ cvs log ccrutil.pl

RCS file: /home/cvs/d600/ccrtest/ccrutil.pl,v
Working file: ccrutil.pl