Tulis perangkat lunak yang mencetak pada stdout jumlah jawaban dan jumlah komentar (terlihat dan runtuh dari pertanyaan dan jawaban) dari pertanyaan / halaman ini.

Script Anda harus berjalan dengan halaman ini ditutup ketika dimulai.

Output contoh yang diharapkan:

A12C40

Di mana A adalah Jawaban dan C untuk Komentar.

Perl, 91 96   92 karakter

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

Beberapa hal hanya untuk memecahkan solusi dari yang lain ha ha ha :-P

tampilkan 93 komentar lagi

href

nt = "99" (ha ha crash @Fez Vrasta)

a, tunjukkan 99 tunjukkan 99 ha ha

href href href ha ha haha ​​:-D

Ya ampun, baru saja memecahkan jawaban saya sendiri! Saya menemukan bahwa salah satu trik di atas, yang saya pikir tidak melakukan apa-apa, akan mulai berfungsi setelah jawaban ini tidak diedit untuk beberapa waktu! Jadi solusi Anda hanya akan bekerja untuk beberapa waktu. Itu sebabnya Anda telah melihat +1 lebih banyak jawaban dalam solusi Anda .. Ini bom waktu! Jawaban saya sudah cenderung :-) Aaah, temukan cara bagaimana meluncurkannya SEKARANG ...

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)

Lebih mudah dibaca (dengan spasi):

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 digunakan sebagai prosesor XQuery.

Python 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='')

Saya berasumsi bahwa pertanyaan ini tidak akan memiliki banyak halaman jawaban.

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}'

Yang sama dengan ini, tetapi tanpa mengarahkan ke file:

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

Keluaran saat ini

A16C76

Penjelasan

Transfer URL.

• -sin curladalah untuk diam. Dan -Luntuk mengikuti arahan ulang.

Untuk mengurai file. Karena beberapa jawaban memiliki beberapa kode untuk memecahkan jawaban lain, penguraian telah diubah sehingga mem-parsing dari awal baris (^) untuk memastikan tidak rusak.

• -F'[<>]'atur pemisah bidang sebagai <atau >. Dengan cara ini teks dapat diuraikan dengan benar untuk "tampilkan XXX komentar lagi".
• /^[\t]*>show <b>/{c+=$4}pada baris yang berisi "spasi ....> tampilkan", dapatkan bidang ke-4 (berdasarkan <, >pemisah) dan tambahkan nilainya ke penghitung komentar.
• /^[ ]*<tr.*s="comm/{++c} pada baris yang berisi "spasi ...
• /^<td.*rcell">/{++a} pada baris yang berisi "", tambahkan penghitung jawaban.
• END{print "A"a"C"c} cetak hasilnya.

PHP yang benar-benar berfungsi (302 karakter)

Tidak seperti semua jawaban lain sejauh ini, ini mengembalikan jawaban yang benar bahkan ketika pertanyaan tersebut tumpah ke lebih dari satu halaman.

<?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("/codegolf/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="")

Dengan lekukan dan penjelasan:

library(XML)
b=htmlParse("/codegolf/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="")

Diuji dengan halaman ini , ia memberikan jumlah komentar yang tepat (termasuk disembunyikan) di halaman depan dan jumlah jawaban yang tepat, yaitu A23C63.

Dan di sini ada solusi pada 482 karakter yang mendapatkan jumlah komentar yang benar jika pertanyaan tersebut akhirnya menyebar pada beberapa halaman:

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="")

Bertakuk:

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="")

Mencoba pada pertanyaan ini dan dikeluarkan: A125C499.

HTML, 37

Maaf, penyalahgunaan aturan Blatant mengikuti!

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

Penjelasan

q0x.eu/1redirect ke: http: //api.stackexchange.com/2.1/questions/20277/comments? site = codegolf & callback = ...

dimana callback berada:

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

q0x.eu/2redirect ke 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>')
})

dan q0x.eu/3?n=...mengalihkan ke 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)
})

Awalnya saya mencoba untuk melakukannya secara sah dan mungkin masih mencoba, tetapi ini tetap menyenangkan!

Ruby 175 (dihitung di seluruh halaman, menggunakan API, bukan 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}}"

Itu 242 tanpa url singkat:

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}}"

291 jawaban sebelumnya:

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(:+)}"

Penghargaan kepada Peter Tailor untuk gagasan menggunakan API, dan Charles untuk menunjuk ke arah API yang lebih baik.

Python dengan stackpy 160

Pelaksanaan

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))

Keluaran

A13C60

Catatan

Kemarin saya berpikir untuk menggunakan stackexchange API tetapi butuh beberapa waktu bagi saya untuk memahami cara kerjanya. Hari ini, saya melihat ada beberapa jawaban pada tema yang sama. Untuk membuat jawaban saya sedikit berbeda, saya menggunakan perpustakaan eksternal.

Sadari juga bahwa jawaban lain yang bergantung pada penguraian pola seperti

cenderung pecah dalam waktu dekat, jadi jawaban yang lebih pasti adalah mengandalkan metode yang kuat seperti ini.

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="")

Setelah saya memposting jawaban saya, hasilnya adalah:

A13C60

Tidak dapat percaya bahwa tidak ada yang muncul sampai sekarang! Solusi paling langsung untuk digunakan :-)

jQuery, 116 101 karakter (di luar kompetisi)

Mungkin ini tidak sesuai dengan aturan, saya menyimpannya hanya untuk bersenang-senang - solusi jQuery tidak boleh hilang :) Setidaknya sebagai referensi untuk menguji skrip Anda !!! ;-)

Coba jalankan dari konsol FireBug:

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

Jika Anda memiliki koneksi yang lambat, tingkatkan batas waktu :-) Terima kasih @Fez Vrasta untuk ide bagus mengklik tautan "tampilkan lebih banyak"!

Beberapa hal lain untuk memecahkan solusi dari yang lain, class = "comment" dan bom waktunya 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">'));

Penjelasan:

<? // 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">')
    );

Untuk pertama kalinya PHP mengalahkan bahasa lain dalam skrip golf: ')

Beberapa markup tambahan untuk topik ini untuk menghindari regex "cheat":

tampilkan 9999 komentar lagi

Node, 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)))})})

Hanya mengenai API sekali ... kemungkinan bisa dipersingkat, tapi saya baru mengenal Node.

153 151 147, C # & CsQuery

C # Dengan CsQuery:

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

Program lengkap:

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 di LINQPad atau di Roslyn

Jika menjalankan melalui LINQPad diizinkan maka:

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

Menghasilkan:

A14C48

Lebih menyenangkan.

F # dengan 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 

JAWABAN YANG TIDAK DILAKUKAN INVALID - DI SINI HANYA UNTUK MENYENANGKAN

Javascript + jQuery - 155

Cukup rekatkan di konsol Anda. Diasumsikan bahwa hanya akan ada satu halaman:

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