perl -MLWP::Simple -e ' print ( scalar ( () = get($ARGV[0]) =~ /\b$ARG
+V[1]\b/g ) )' http://www.perlmonks.org/ Monks
[download]