Viết một phần mềm in trên stdout số lượng câu trả lời và số lượng bình luận (hiển thị và thu gọn câu hỏi và câu trả lời) của câu hỏi / trang này.

Kịch bản của bạn phải chạy khi trang này đóng khi nó bắt đầu.

Đầu ra ví dụ dự kiến:

A12C40

Trong đó A là viết tắt của Câu trả lời và C cho Nhận xét.

Perl, 91 96   92 ký tự

$_=`curl -sL qr.net/_9`;s/<[^>]+nt="(.+)/$c+=$1/ge;say"A",s/<td.*"ans//g,C,$c+s/<tr.*"com//g

Một số thứ chỉ để phá vỡ giải pháp của người khác ha ha ha :-P

hiển thị thêm 93 bình luận

href

nt = "99" (sự cố ha ha @Fez Vrasta)

a, show 99 show 99 ha ha

href href href ha ha ha haha ​​:-D

jeeez, chỉ cần phá vỡ câu trả lời của riêng tôi! Tôi phát hiện ra rằng một trong những thủ thuật trên, mà tôi nghĩ là không có gì, sẽ bắt đầu hoạt động sau khi câu trả lời này không được chỉnh sửa trong một thời gian! Vì vậy, giải pháp của bạn sẽ chỉ làm việc trong một thời gian. Đó là lý do tại sao bạn đã thấy thêm 1 câu trả lời trong các giải pháp của mình .. Đó là một quả bom hẹn giờ! Câu trả lời của tôi đã thiên về nó :-) Aaah, đã tìm ra cách để khởi chạy nó NGAY BÂY GIỜ ...

XQuery, 169 , 160 , 165

let$d:=html:parse(fetch:binary('http://qr.net/1_'))return"A"||count($d//*[@class="answer"])||"C"||count($d//*[@class="comment"])+sum($d//*[@class="comments-link"]/b)

Dễ đọc hơn (có dấu cách):

let $d:= html:parse(fetch:binary('http://qr.net/1_'))
return "A" || count($d//*[@class="answer"]) || "C" || count($d//*[@class="comment"]) + sum($d//*[@class="comments-link"]/b)

BaseX đã được sử dụng làm bộ xử lý XQuery.

Trăn 3, 180

import lxml.html as h
s=h.parse('http://qr.net/1_').find('body').cssselect
print('A',len(s('.answer')),'C',len(s('.comment'))+sum(int(e.text)for e in s('.comments-link b')),sep='')

Tôi cho rằng câu hỏi này sẽ không có nhiều trang trả lời.

BASH + AWK 163 , 144 , 138 , 111 , 110 , 114 , 131 , 132 , 105

curl -sL http://qr.net/_9|awk -F'[<>]' '/^[\t]*>s/{c+=$4}/<tr.*"c/{++c}/<t.*"a/{++a}END{print "A"a"C"c}'

Điều này giống như thế này, nhưng không chuyển hướng đến một tệp:

curl -sL http://qr.net/_9>f
awk -F'[<>]' '/^[\t]*>s/{c+=$4}/<tr.*"c/{++c}/<t.*"a/{++a}END{print "A"a"C"c}' f

Sản lượng hiện tại

A16C76

Giải trình

Chuyển một URL.

• -strong curllà cho im lặng. Và -Lđể theo chuyển hướng.

Để phân tích các tập tin. Vì một số câu trả lời có một số mã để phá vỡ các câu trả lời khác, việc phân tích cú pháp đã được thay đổi để nó phân tích cú pháp từ đầu dòng (^) để đảm bảo rằng nó không bị hỏng.

• -F'[<>]'đặt dấu phân cách trường là <hoặc >. Bằng cách này, văn bản có thể được phân tích cú pháp chính xác cho "hiển thị thêm bình luận XXX".
• /^[\t]*>show <b>/{c+=$4}trên dòng có chứa "không gian ....> hiển thị", có lĩnh vực 4 (dựa trên <, >dải phân cách) và thêm giá trị cho ý kiến quầy.
• /^[ ]*<tr.*s="comm/{++c} trên các dòng chứa "khoảng trắng ...
• /^<td.*rcell">/{++a} trên các dòng chứa "", tăng bộ đếm câu trả lời.
• END{print "A"a"C"c} in đầu ra.

PHP thực sự hoạt động (302 ký tự)

Không giống như tất cả các câu trả lời khác cho đến nay, câu trả lời này trả lời đúng ngay cả khi câu hỏi tràn vào nhiều hơn một trang.

<?function g($a,$b,$i){return json_decode(gzinflate(substr(file_get_contents("http://api.stackexchange.com/2.1/$a/$i/$b?site=codegolf"),10,-8)))->items;}$i=array(20277);foreach(g("questions","answers",20277)as$x)$i[]=$x->answer_id;echo"A".(count($i)-1)."C".count(g("posts","comments",implode(";",$i)));

R, 326

library(XML);b=htmlParse("https://codegolf.stackexchange.com/questions/20277");z=xpathApply;x=do.call(sum,sapply(z(b,"//tbody",xmlAttrs),function(x)as.integer(x[[1]])))+length(z(b,"//tr[@class='comment']",xmlValue));y=gsub("[^0-9]","",z(b,"//div[@class='subheader answers-subheader']/h2",xmlValue)[[1]]);cat("A",y,"C",x,sep="")

Với sự thụt lề và giải thích:

library(XML)
b=htmlParse("https://codegolf.stackexchange.com/questions/20277")
z=xpathApply
x=do.call(sum,sapply(z(b,"//tbody",xmlAttrs),  #Take the first attribute of tag tbody
                     function(x)as.integer(x[[1]]))) #And sum them (=nb of hidden comments
  +length(z(b,"//tr[@class='comment']",xmlValue)) #+nb of visible comments
y=gsub("[^0-9]","", #This is more straightforward as the number of answers is given on front page.
        z(b,"//div[@class='subheader answers-subheader']/h2",xmlValue)[[1]])
cat("A",y,"C",x,sep="")

Đã thử nghiệm với trang này , nó đưa ra số lượng bình luận đúng (bao gồm cả ẩn) trên trang đầu và số câu trả lời đúng, nghĩa là A23C63.

Và đây là một giải pháp với 482 ký tự lấy đúng số lượng bình luận nếu câu hỏi kết thúc lan rộng trên một số trang:

library(XML);h=htmlParse;z=xpathApply;v=xmlValue;a=xmlAttrs;s=sapply;c="http://codegolf.stackexchange.com";f=function(b,i){do.call(sum,s(z(b,"//tbody",a)[i],function(x)as.integer(x[[1]])))+length(z(b,"//tr[@class='comment']",v))};b=h(paste0(c,"/questions/20277"));x=f(b);u=unique(s(z(b,"//div[@class='pager-answers']/a",a),`[`,1));if(length(u))x=x+sum(s(u,function(x)f(h(paste0(c,x)),-1)));y=gsub("[^0-9]","",z(b,"//div[@id='answers-header']/div/h2",v)[[1]]);cat("A",y,"C",x,sep="")

Thụt lề:

library(XML)
h=htmlParse
z=xpathApply
v=xmlValue
a=xmlAttrs
s=sapply
c="http://codegolf.stackexchange.com"
f=function(b,i){do.call(sum,s(z(b,"//tbody",a)[i],function(x)as.integer(x[[1]])))+length(z(b,"//tr[@class='comment']",v))}
b=h(paste0(c,"/questions/20277"))
x=f(b)
u=unique(s(z(b,"//div[@class='pager-answers']/a",a),`[`,1)) #Grab all URLS of pages
if(length(u))x=x+sum(s(u,function(x)f(h(paste0(c,x)),-1))) #Apply comment computation of all URLs
y=gsub("[^0-9]","",z(b,"//div[@id='answers-header']/div/h2",v)[[1]])
cat("A",y,"C",x,sep="")

Đã thử câu hỏi này và xuất ra : A125C499.

HTML, 37

Xin lỗi, lạm dụng quy tắc trắng trợn sau!

<script src=http://q0x.eu/1></script>

Giải trình

q0x.eu/1chuyển hướng đến: http: //api.stackexchange.com/2.1/questions/20277/comments? site = codegolf & callback = ...

trong đó gọi lại là:

(function(d){
    c=d.items.length;
    document.write('<script src="http://q0x.eu/2"></script>')
})

q0x.eu/2chuyển hướng đến http: //api.stackexchange.com/2.1/questions/20277/answers? site = codegolf & callback = ...

(function(d){
    a=0;
    g=[];
    d.items.map(function(f){
        a++;
        g.push(f.answer_id)
    });
    document.write('<script src="http://q0x.eu/3?n='+g.pop()+'"></script>')
})

và q0x.eu/3?n=...chuyển hướng đến http: //api.stackexchange.com/2.1/answers/.../comments? site = codegolf & callback = ...

(function(d){
    c+=d.items.length;
    g.length ? document.write('<script src="http://q0x.eu/3?n='+g.pop()+'"></script>') : alert('A'+a+'C'+c)
})

Ban đầu tôi đã cố gắng làm điều đó một cách hợp pháp và vẫn có thể có một chuyến đi, tuy nhiên điều này vẫn rất vui!

Ruby 175 (đếm trên các trang, sử dụng API thay vì DOM)

require'open-uri';require'json'
q=JSON.parse(open("http://qr.net/oyJn").read)["items"][0];a=q["answers"]
puts"A#{a.count}C#{[q,*a].reduce(0){|m,o|m+o["comments"].to_a.count}}"

Đó là 242 mà không có url rút ngắn:

require'open-uri';require'json'
q=JSON.parse(open("http://api.stackexchange.com/2.1/questions/20277?site=codegolf&filter=!azbR89z2Zw*dg.").read)["items"][0]
a=q["answers"]
puts"A#{a.count}C#{[q,*a].reduce(0){|m,o|m+o["comments"].to_a.count}}"

Câu trả lời trước đó:

require'open-uri';require'json'
def g(o,l,f);JSON.parse(open("http://api.stackexchange.com/2.1/#{o}/#{l}/#{f}?site=codegolf").read)["items"];end
q=20277
p=g("questions",q,"answers").inject([q]){|m,o|m<<o["answer_id"]}
puts"A#{p.count-1}C#{p.map{|i|g("posts",i,"comments").count}.reduce(:+)}"

Tín dụng cho Peter Tailor cho ý tưởng sử dụng API và Charles đã chỉ ra một API tốt hơn.

Python với stackpy 160

Thực hiện

s=__import__("stackpy").Site("codegolf");q=s.questions(20277);a=q.answers
print"A%dC%d"%(len(a),sum(len(s.answers(e.id()).comments)for e in a)+len(q.comments))

Đầu ra

A13C60

chú thích

Hôm qua tôi đã dự tính sử dụng API stackexchange nhưng phải mất một thời gian để tôi hiểu cách thức hoạt động của nó. Hôm nay, tôi thấy có một vài câu trả lời về cùng một chủ đề. Để làm cho câu trả lời của tôi hơi khác một chút, tôi mặc dù sử dụng một thư viện bên ngoài.

Cũng nhận ra rằng các câu trả lời khác dựa trên phân tích cú pháp cho các mẫu như

có khả năng phá vỡ bất cứ lúc nào sớm, vì vậy một câu trả lời chắc chắn hơn là dựa vào một phương pháp mạnh mẽ như phương pháp này.

R 239

library(XML);F=function(x,y,f=length,z='')sum(as.double(xpathSApply(htmlParse('http://qr.net/1_'),sprintf('//%s[@class="%s"]%s',x,y,z),f)));cat("A",F("div","answer"),"C",F("a","comments-link ",xmlValue,"//b")+F("td","comment-text"),sep="")

Sau khi tôi đăng câu trả lời của mình, đầu ra là:

A13C60

Không thể tin rằng không ai đã đưa ra nó cho đến bây giờ! Giải pháp trực tiếp nhất để sử dụng :-)

jQuery, 116 101 ký tự (không cạnh tranh)

Có lẽ điều này không tuân theo các quy tắc, tôi giữ nó chỉ để giải trí - không thể thiếu giải pháp jQuery :) Ít nhất là một tài liệu tham khảo để kiểm tra các tập lệnh của bạn !!! ;-)

Hãy thử chạy từ bảng điều khiển FireBug:

$('.comments-link').click();
setTimeout("alert('A'+$('.answer').length+'C'+$('.comment').length)",999)

Nếu bạn có kết nối chậm, hãy tăng thời gian chờ :-) Cảm ơn @Fez Vrasta vì ý tưởng tuyệt vời khi nhấp vào liên kết "hiển thị thêm"!

Một số thứ khác để phá vỡ giải pháp của người khác, class = "bình luận" và quả bom hẹn giờ ha ha

PHP: 184 172

<?$h=file_get_contents('http://qr.net/_9');preg_match_all('/<t.*nt="([0-9]*)/',$h,$c);echo 'A'.substr_count($h,'rcell">').'C'.(array_sum($c[1])+substr_count($h,'mment">'));

Giải trình:

<? // short open tag
  $h = file_get_contents('http://qr.net/_9'); // store in $h the content of the shortened url of the page
  preg_match_all('/<t.*nt="([0-9]*)/', $h, $c); // find each "show/hide X more comments" and store the numbers in $c
  echo
    'A' // output A
    .substr_count($h,'rcell">') // output the count of the occurrences of 'rcell">' (short for '"answercell">')
    .'C' // output C
    .( 
      array_sum( $c[1] ) // output the sum of the collapsed comments found before
      + 
      substr_count( $h, 'mment">') // output the count of the occurrences of 'mment">' (short for '"comment">')
    );

Lần đầu tiên PHP đánh bại các ngôn ngữ khác trong các tập lệnh golf: ')

Một số đánh dấu thêm cho chủ đề này để tránh regex "cheat":

hiển thị thêm 9999 ý kiến

Nút, 403

r=require;m='comments'
r('http').get("http://api.stackexchange.com/2.1/questions/20277?site=codegolf&filter=!azbR89z2Zw*dg.").on('response',function(p){p.pipe(r('zlib').createGunzip(o="")).on('readable',function(){o+=this.read()}).on('end',function(){d=JSON.parse(o).items[0]
r('util').print("A",d.answer_count,"C",(d[m].length+d.answers.reduce(function(p,c){return p+(c[m]?c[m].length:0)},0)))})})

Chỉ truy cập API một lần ... có thể rút ngắn, nhưng tôi mới biết về Node.

153 151 147, C # & CsQuery

C # Với CsQuery:

    var d = CsQuery.CQ.CreateFromUrl("http://qr.net/1_");
    Console.Write("A" + d[".answer"].Count() + "C" + d[".comment"].Count());

Chương trình đầy đủ:

class P{static void Main(){var d =CsQuery.CQ.CreateFromUrl("http://qr.net/1_");Console.Write("A"+d[".answer"].Count()+"C"+d[".comment"].Count());}}

118 C # & CsQuery trong LINQPad hoặc Roslyn

Nếu chạy qua LINQPad thì được phép:

var d =CsQuery.CQ.CreateFromUrl("http://qr.net/1_");Console.Write("A"+d[".answer"].Count()+"C"+d[".comment"].Count());

Sản xuất:

A14C48

Một số niềm vui hơn.

F # với CsQuery, 143:

[<EntryPoint>]
let main x= 
 let d=CsQuery.CQ.CreateFromUrl("http://qr.net/1_")
 printfn "A%dC%d" d.[".answer"].Length d.[".comment"].Length
 0 

LIÊN QUAN ĐẾN TRẢ LỜI TRẢ LỜI - TẠI ĐÂY CHỈ CHO FUN

Javascript + jQuery - 155

Chỉ cần dán nó vào bàn điều khiển của bạn. Giả sử rằng sẽ chỉ có một trang:

(function(){var n=$(".comment").length;$(".comments-link b").each(function(g,f){n+=parseInt($(f).html())});return"A"+$("#answers .answer").length+"C"+n})()