Today, I got an "urgent" message from someone who desperately needs to delete all of the CVS directories below the main directory. How do you do this in Perl, he says (urgently)?
Well, you don't. I answered his question because its pretty easy. If I had to think about it, I would just move to the next "urgent" question waiting for me.
Just use the right CVS command.
$ cvs export
Or, if you don't like that (maybe you don't have access to the repository), a little command line magic works.
$ find . -name CVS | xargs rm -rf