This could prove useful - at least save me some typing. I fairly often resort to piping files through something like:
perl -ne '/regex/ && print'
or
perl -ne '/regex/ && $c++; END { print "$c\n"; }'
Thanks!