or download this
# note that a simple pure perl version using 3arg open and
# e.g. $count=$contents=~s/$argument/$&/g will have
...
# upd: either -H OR /dev/null, sigh. a very telling misread of mine
$results=`grep -c -H "\$argument" "\$file"`; # /dev/null`; # note \$ i
+nstead of \"