Faster to write, and less annoying for the user (doesn't have to answer questions):

grep -c -i -F <PATTERN> <FILE>
[download]

Code reuse doesn't stop at the Perl/non-Perl border.