Escriba un software que imprima en stdout el número de respuestas y el número de comentarios (visibles y colapsados ​​de preguntas y respuestas) de esta pregunta / página.

Su script debe ejecutarse con esta página cerrada cuando se inicia.

Salida de ejemplo esperada:

A12C40

Donde A representa Respuestas y C para Comentarios.

Perl, 91 96   92 caracteres

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

Algunas cosas solo para romper soluciones de otros ja ja ja :-P

mostrar 93 comentarios más

href

nt = "99" (ja, ja, choque @Fez Vrasta)

a, mostrar 99 mostrar 99 ja, ja

href href href ja, ja, ja :-D

jeeez, acabo de romper mi propia respuesta! ¡Descubrí que uno de los trucos anteriores, que pensé que no hace nada, comenzará a funcionar después de que esta respuesta no se edite por un tiempo! Por lo tanto, sus soluciones funcionarán solo por un tiempo. Es por eso que has visto +1 respuesta más en tus soluciones. ¡Es una bomba temporizada! Mi respuesta ya es propensa a eso :-) Aaah, encontré una manera de lanzarlo AHORA ...

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)

Más legible (con espacios):

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 se utilizó como procesador XQuery.

Pitó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='')

Supongo que esta pregunta no tendrá varias páginas de respuestas.

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

Que es lo mismo que esto, pero sin redirigir a un archivo:

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

Salida de corriente

A16C76

Explicación

Transfiere una URL.

• -sen curles para el silencio. Y -Lpara seguir las redirecciones.

Para analizar el archivo. Como algunas respuestas tenían algún código para romper otras respuestas, el análisis se ha modificado para que se analice desde el principio de la línea (^) para asegurarse de que no esté roto.

• -F'[<>]'establecer separadores de campo como <o >. De esta forma, el texto se puede analizar correctamente para "mostrar XXX comentarios más".
• /^[\t]*>show <b>/{c+=$4}en las líneas que contienen "espacios ....> show", consigue el cuarto campo (basado en <, >separadores) y añadir el valor a los comentarios de contador.
• /^[ ]*<tr.*s="comm/{++c} en líneas que contienen "espacios ...
• /^<td.*rcell">/{++a} en líneas que contienen "", incremente el contador de respuestas.
• END{print "A"a"C"c} imprime la salida.

PHP que realmente funciona (302 caracteres)

A diferencia de todas las otras respuestas hasta ahora, esto devuelve la respuesta correcta incluso cuando la pregunta se derrama en más de una página.

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

Con sangría y explicaciones:

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

Probado con esta página , proporciona el número correcto de comentarios (incluidos los ocultos) en la página principal y el número correcto de respuestas, es decir A23C63.

Y aquí hay una solución con 482 caracteres que captura el número correcto de comentarios si la pregunta termina extendiéndose en varias páginas:

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

Sangrado:

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

Tratado en esta pregunta y da salida: A125C499.

HTML, 37

Lo sentimos, sigue el abuso de reglas descaradas.

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

Explicación

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

donde la devolución de llamada es:

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

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

y q0x.eu/3?n=...redirige a 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)
})

Originalmente estaba tratando de hacerlo legítimamente y todavía podría intentarlo, ¡pero fue divertido de todos modos!

Ruby 175 (cuenta a través de las páginas, usando la API en lugar del 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}}"

Eso es 242 sin la URL acortada:

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

Respuesta anterior 291:

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

Créditos a Peter Tailor por la idea de usar la API, y a Charles por apuntar hacia una API mejor.

Python con stackpy 160

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

Salida

A13C60

Nota

Ayer contemplé el uso de la API de stackexchange, pero me tomó un tiempo entender cómo funciona. Hoy, vi que había un par de respuestas sobre el mismo tema. Para hacer mi respuesta un poco diferente, pensé en usar una biblioteca externa.

También tenga en cuenta que otras respuestas que se basan en el análisis de patrones como

es probable que se rompan pronto, por lo que una respuesta más definitiva es confiar en un método robusto como este.

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

Después de publicar mi respuesta, el resultado es:

A13C60

¡No puedo creer que a nadie se le haya ocurrido hasta ahora! La solución más directa para usar :-)

jQuery, 116101 caracteres (fuera de competencia)

Quizás esto no va con las reglas, lo mantengo solo por diversión: ¡no puede faltar la solución jQuery :) Al menos como referencia para probar sus scripts! ;-)

Intenta ejecutar desde la consola FireBug:

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

Si tiene una conexión lenta, aumente el tiempo de espera :-) ¡Gracias @Fez Vrasta por la gran idea de hacer clic en los enlaces "mostrar más"!

Algunas otras cosas para romper la solución de los demás, clase = "comentario" y la bomba temporizada, ja, ja

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

Explicación:

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

Por primera vez, PHP supera a otros idiomas en scripts de golf: ')

Algunas marcas adicionales a este tema para evitar "trucos" de expresiones regulares:

mostrar 9999 comentarios más

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

Solo golpea la API una vez ... probablemente pueda acortarse, pero soy nuevo en Node.

153 151 147, C # y CsQuery

C # con CsQuery:

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

Programa completo:

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 en LINQPad o en Roslyn

Si se permite ejecutar a través de LINQPad, entonces:

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

Produce:

A14C48

Un poco más de diversión.

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

RESPUESTA SIN VALOR NO VÁLIDA - AQUÍ SOLO POR DIVERSIÓN

Javascript + jQuery - 155

Solo pégalo en tu consola. Asume que solo habría una página:

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