7月1日是加拿大日（是加拿大）！还是？看来，今天的Wikipedia页面上有很多与加拿大相关的内容，但是还有哪一天是加拿大的？

您的任务是编写一个程序或函数，该程序或函数以日期（月和日）作为输入，并在输入的日期上返回或输出Wikipedia页面上“加拿大”的提及数目。一些规则：

• 日期可以以您选择的任何合理格式输入
• 您的提交必须从url中提取数据en.wikipedia.org/wiki/Month_Day。
• 仅"Canada"在标题情况下，才必须搜索并计算包含的子字符串。"Canadian"不算，但是"Canada's"算。只要"Canada"字符串中存在确切的，区分大小写的文本，它就是一个匹配项
• 该页面的内容被视为相应.html文件中的任何内容（即，如果您以a的形式下载.html并在记事本中打开该页面，将会显示什么内容）
• 结果可以以任何其他合理方式输出到STDOUT，返回或显示

测试用例：

July 1 => 34
May 14 => 1
Oct 31 => 2
July 4 => 2

这是代码高尔夫，所以最短的提交者获胜

（作为无奖励的奖金，我很想看看计数最高的那一天是什么）

Pyth，31个字节

/jk'+"http://enwp.org/"z"Canada

在联机实施中不起作用，服务器禁用Internet访问。我想使用http://wki.pe/July_1，但遗憾的是这是客户端重定向，因此它获取了错误的页面。输入格式为July_1。

代码基本上就是：

"".join(open("http://enwp.org/"+input())).count("Canada")

Bash，43 42 40字节

curl -L enwp.org/$@|grep -o Canada|wc -l

使用curl，grep和wc计算指定网页中“加拿大”的出现次数。像其他答案一样，输入格式为July_1。这是我第一次在Code Golf SE上发帖，我对所有规则都不是很熟悉。任何反馈将是最欢迎的。

没有意识到 传统上会忽略to的输出STDERR 。感谢您的3个字节，丹尼斯！

Perl 5，39个字节

38个字节，加上1 -pe代替-e

$_=()=`curl -L enwp.org/$_`=~/Canada/g

接受类似的输入July_1。

感谢busukxuan为我节省了七个字节。

Python 3.5、117 111 98 90字节

（-8字节（98 -> 90）感谢alexwlchan）

from urllib.request import*
lambda i:urlopen('http://enwp.org/'+i).read().count(b"Canada")

只需使用Python的内置“ urllib”库来获取HTML数据，然后计算该数据中单词“ Canada”的出现次数。我会在可能的时间和地点尝试更多的高尔夫运动。通过将lambda函数重命名为任何东西，然后像包装在中的普通函数一样调用该名称来调用它print()。例如，如果该函数被命名为H，则您可以将其命名为print(H(Month_Day))。

Mathematica，60个字节

Import["http://enwp.org/"<>#,"Source"]~StringCount~"Canada"&

匿名函数。与Perl 5解决方案类似，输入类似July_1。

PowerShell，52个字节

((iwr enwp.org/$($args[0]))-csplit"Canada").length-1

• 输入为July_1。
• iwr是的缩写Invoke-WebRequest。
• $($args[0])是第一个命令行参数。以启动脚本OhCanada.ps1 July_1。
• -csplit 区分大小写。

C＃，85个字节

return Regex.Matches(new WebClient().DownloadString("http://enwp.org/"+d),"Canada").Count;

接受d类似的输入July_1。

而且July_1 是真正的加拿大国庆日，拥有最引用。随着February_1和April_2318共享第二名"Canada"s各自。

查找"Canada"日期（并行），207个字节：

return Enumerable.Range(0,366).Select(i=>new DateTime(8,1,1).AddDays(i).ToString("MMMM_d")).AsParallel().OrderBy(d=>Regex.Matches(new WebClient().DownloadString("http://enwp.org/"+d),"Canada").Count).Last();

（第8年是代表时间最短的the年）。潜在的效率低下，因为它OrderBy可能会生成> 366个网络调用，但会更短一些，并且似乎会在不多的时间内完成。

R，99 96字节

x = function（d）{p = readLines（paste0（“ http://enwp.org/”，d））; sum（nchar（p）-nchar（gsub（“ Canada”，“”，p））） / 6}

d=scan(,"");p=readLines(paste0("http://enwp.org/",d));sum(nchar(p)-nchar(gsub("Canada","",p)))/6

这将采用格式为“ July_1”的输入d并返回加拿大的计数。它通过计算页面上的字符数来计算单词数，然后从页面中删除“加拿大”一词并再次计算字符数。加拿大出现的次数是这些计数的差除以加拿大的字母数，即6。

编辑：我感谢下面的提示有关用扫描替换我的功能。

ES6，89个字节

d=>fetch('http://enwp.org/'+d).then(r=>r.text().then(t=>alert(t.split`Canada`.length-1)))

可悲的是，解开所有的诺言会损害大小：/

Ruby + curl，44个字节

p`curl -L enwp.org/#$_`.scan(/Canada/).size

ruby -n+ 43个字节。接受类似的输入July_1。

Clojure，71个字节

#(count(re-seq #"Canada"(slurp(str"https://en.wikipedia.org/wiki/"%))))

是的，使用起来很好，http://enwp.org但是我猜slurp不处理重定向（？）。匿名功能，格式为“ July_1”，需要一天时间。

PHP，65字节

echo substr_count(file_get_contents('http://enwp.org'),'Canada');