Sure, I use my perl script cgrep: Egrep clone with function name display mostly for grepping through large C or C++ source trees, in fact that's why I wrote it originally.

Also, nowdays I sometimes write perl as a prototyping language: I write a program in perl furst and then compile it to C++.