挑战

给定一个Youtube播放列表，输出其中的视频数量。

输入输出

播放列表将作为URL给出；例如，https://www.youtube.com/playlist?list=PL_3jnZNPYn7qUatgDYBS5NShkfXoehSRC（（这是一个朋友发送给我的播放列表，试图让我听K-Pop，因为她迷恋它，而我不喜欢它：P）

播放列表的链接的格式为 https://www.youtube.com/playlist?list=<id>。输入的是URL，而不是ID。

输出将是一个整数，指示此播放列表中有多少个视频。您既可以输出视频总数，也可以输出未删除视频的数量，以适合您的情况为准。

测试用例

https://www.youtube.com/playlist?list=PL_3jnZNPYn7qUatgDYBS5NShkfXoehSRC -> 12
https://www.youtube.com/playlist?list=PLIEbITAtGBebWGyBZQlkiMXwt30WqG9Bd -> 114 OR 1

随时添加更多测试用例。

05AB1E，22字节

假设URL传递没有了https://。

码：

.w’®Ã-ƒ¢’¡`"<li>"¡2è#¬

使用05AB1E编码。由于可以访问互联网，因此无法在线尝试。

说明：

.w                       # Receive implicit input and read all data from the url
  ’®Ã-ƒ¢’¡               # Split on the string "header-details"
          `              # Flatten once which leaves the last element on top of the stack
           "<li>"¡       # Split on the string "<li>"
                  2è     # Get the third element
                    #    # Split on spaces
                     ¬   # Retrieve the first element 

这是在命令行中运行时得到的：

Scala 2.12，138字节

print("""<li>.*?</li><li>(\d+).*?</li>""".r.findFirstMatchIn(scala.io.Source.fromURL(args(0),"utf-8").getLines.mkString("")).get.group(1))

将其保存到something.scala并由运行scala something.scala {url}。

JS（ES6），68个字节

x=>fetch(x).then(x=>x.text()).then(x=>alert(x.match(/(\d+) vi/)[1]))

将其粘贴到youtube.com上的控制台中以尝试：

(x=>fetch(x).then(x=>x.text()).then(x=>alert(x.match(/(\d+) vi/)[1])))(prompt("Enter the URL"))

MATL，15字节

感谢Hyper Neutrino发现错误，现已纠正。

Xi'wner">\n'XXn

输入是用单引号引起来的字符串。输出是未删除视频的数量。

这是两个测试用例的示例。截至2017年6月13日，播放列表中未删除的视频数量分别为12和1。

怎么运行的

Xi          % Read string containing URL and get contents as a string
'wner">\n'  % Push this string
XX          % Regexp matching. Gives a cell array with the matched strings
n           % Number of elements. Implicitly display

bash + curl + gnu grep，32个字节

最后，让Code Golf成为可能：

curl -s $1|grep -Po \\d+(?= vid)

• 使用curl -s到下载没有任何额外的输出。
• 将输出管道传输到grep（perl regex），后者只会输出匹配项
  • 匹配以“ vid”开头的第一个数字

这是从我实际的做法出发的。

PowerShell，55字节

"$(iwr "$args")"-match'(?s)(\d+) vid'>$null;$matches[1]

浏览到该站点。将对象转换为html源字符串。解析出带有正则表达式“ vid”之前的数字的字符串。

逻辑适用于两个测试用例。

Haskell 161字节

import Network.Curl.Download
import qualified Data.ByteString.Char8 as B
z=do u<-getLine;(Right b)<-openURI u;putStrLn$show$length$B.findSubstrings(B.pack"<tr")b