Viết chương trình kết nối với trang web này, tải xuống chính câu trả lời được đăng, trích xuất mã nguồn của chính nó và in ra. Đầu ra phải giống hệt với mã nguồn. Mã ngắn nhất (tính bằng byte) sẽ thắng.

Quy tắc:

• Không cho phép rút ngắn URL.
• Câu trả lời phải có định dạng thông thường - một tiêu đề với tên và kích thước ngôn ngữ, mô tả tùy chọn, khối mã, mô tả và giải thích tùy chọn. Không cho phép phân định không tự nhiên.
• Đầu ra phải bắt nguồn từ khối mã thực tế được đăng trên trang web.
• Các chức năng không được phụ thuộc vào vị trí trong danh sách trả lời; nó sẽ hoạt động ngay cả khi có nhiều trang và câu trả lời không nằm ở trang đầu tiên.
• Mới: lưu ý đặc biệt cho các câu trả lời được cho là chạy trong trình duyệt: bạn có thể yêu cầu chạy chúng trên miền codegolf (tuân theo chính sách cùng nguồn gốc) nhưng phải bao gồm tên miền và đường dẫn trong giải pháp để làm cho nó công bằng

Bash + coreutils + trình duyệt Lynx, 61 byte

Cảm ơn @FDinoff về các mẹo:

lynx -dump codegolf.stackexchange.com/posts/28164/body|grep 2

Ruby, 155 186 195 148 138 110 97 ký tự

require'open-uri';puts open('http://codegolf.stackexchange.com/posts/28159/body').read[/req.+;/];

Tôi đã phải làm cho nó một dòng, bởi vì nếu không nó sẽ tạo ra các dòng mới \nthay vì các dòng mới thực sự.

• +31 ký tự vì tôi không nhận thấy một số nhân vật đã được trốn thoát.
• +9 ký tự để thoát khỏi dấu gạch chéo khó chịu.
• Cảm ơn Nathan Osman vì đã lưu 2 ký tự và Ventero đã lưu 55 (!!!) bằng cách loại bỏ sự cần thiết của hầu hết các bản sửa lỗi được liệt kê ở trên.

Lời giải thích

Trước tiên hãy làm đẹp điều này một chút. Tuy nhiên, tôi sẽ phải sử dụng một ký hiệu hơi ... thú vị trong mã này. Tôi không thể sử dụng dấu chấm phẩy trong bài viết này, vì những lý do được giải thích sau, vì vậy tôi sẽ sử dụng {SEMI}thay cho dấu chấm phẩy thay thế.

require 'open-uri'
resp = open('http://codegolf.stackexchange.com/posts/28159/body').read
puts resp.match(/req.+{SEMI}/){SEMI}

Được rồi, bây giờ chúng ta hãy đi qua điều này. Hai dòng đầu tiên khá tự giải thích - chúng lấy văn bản HTML của câu trả lời này.

Bây giờ, dòng cuối cùng là một trong những thú vị ở đây. Bạn thấy dấu chấm phẩy dường như vô dụng ở cuối đoạn mã? Đó là hoàn toàn cần thiết, và đây là lý do tại sao.

Đầu tiên, resp.matchtrích xuất mã được in. Các regrec nó sử dụng cho điều này là mẹo : /req.+{SEMI}/. Nó lấy phần đầu của mã REQuire'net/http', bằng cách tìm kiếm req( resẽ lấy của tôi REputation). Sau đó, nó tìm thấy phần cuối của mã bằng cách tìm kiếm một dấu chấm phẩy! Vì +mặc định là tham lam, nên nó sẽ tiếp tục cho đến khi tìm thấy dấu chấm phẩy biểu thị sự kết thúc của mã. Xem lý do tại sao tôi không thể sử dụng dấu chấm phẩy nữa?

Sau đó, tôi không phải tiết lộ bất cứ điều gì nhờ vào cách khắc phục không sử dụng \nữa của Venter . Tất cả tôi phải làm là sửa chữa {AMPERSAND}thay đổi thành {AMPERSAND}amp{SEMI}, có thể đạt được chỉ bằng cách loại bỏ amp{SEMI}phần. Không cần điều này nữa vì URL mới. Sau đó, mã gốc đã được lấy! (Lưu ý: Tôi cũng không thể sử dụng ký hiệu và vì mã hóa HTML đã tạo ra dấu chấm phẩy được tạo.)

PowerShell - 69 62

(irm codegolf.stackexchange.com/posts/28236/body).div.pre.code

JavaScript - 123 122 101 95 92 91 87 86 114

with(new XMLHttpRequest)send(open(0,/\codegolf.stackexchange.com\posts\28175\body/,0)),alert(/w.*/.exec(response))

Chạy trong bảng điều khiển của trình duyệt web của bạn trên trang này. Đã thử nghiệm trên Chrome và Firefox mới nhất .

chỉnh sửa: +28 byte để thêm tên miền đầy đủ.

Firefox không thích thủ thuật URL Regex của tôi nữa với bản cập nhật này :(

Đây là giải pháp 86 byte phá vỡ quy tắc:

with(new XMLHttpRequest)send(open(0,/posts\28175\body/,0)),alert(/w.*/.exec(response))

Ruby + wget + gunzip , 159 86 82 71

Sử dụng mẹo của @FDinoff để sử dụng http://codegolf.stackexchange.com/posts/28173/body.

puts `wget -qO- codegolf.stackexchange.com/posts/28173/body`[/pu.*\]/]

Thử nghiệm. Cảm ơn @ace và @Bob để tối ưu hóa dòng lệnh.

CJam - 53

"codegolf.stackexchange.com/posts/28184/body"g54/1=);

Tôi đang tạo wiki cộng đồng này vì tôi đang trả lời câu hỏi của riêng mình và không thực sự muốn cạnh tranh: p
Tín dụng cho FDinoff cho lựa chọn URL.

Rebmu, 91 ký tự

Do Catch-22 tôi phải đăng bài để nhận URL của câu trả lời này. :-/ Được rồi, đã rõ.

paTSrd http://codegolf.stackexchange.com/a/28154[th<a name="28154">th<code>cpCto</code>]prC

Rebmu là một phương ngữ của Rebol, và bạn có thể đọc tất cả mọi thứ . Rebol tương đương ở đây sẽ là:

parse to-string read http://codegolf.stackexchange.com/a/28154 [
    thru <a name="28154">
    thru <code>
    copy c to </code>
]
print c

PARSE của Rebol là một loại câu trả lời dễ hiểu cho RegEx. Nó bắt đầu một vị trí phân tích cú pháp của đầu vào (có thể là bất kỳ chuỗi nào, bao gồm các khối cấu trúc ... dữ liệu nhị phân ... hoặc các loại chuỗi) . Các quy tắc là một ngôn ngữ cho cách vị trí phân tích di chuyển.

Thẻ và URL thực sự chỉ là chuỗi dưới mui xe trong ngôn ngữ. Nhưng chúng là "hương vị", và vì Rebol được gõ động, bạn có thể kiểm tra loại đó. Ví dụ, READ biết rằng nếu bạn cung cấp cho nó một chuỗi có hương vị URL, thì nó sẽ gửi đến một trình xử lý lược đồ để thực hiện việc đọc. (Trong trường hợp này, một người đã đăng ký HTTP). Bạn lấy lại các byte UTF-8 theo mặc định, vì vậy chúng tôi sử dụng chuỗi để giải mã điều đó và nhận một loạt các điểm mã trong một chuỗi Unicode bình thường.

Trong trường hợp phương ngữ phân tích cú pháp, việc gặp một loại thẻ chỉ được khớp với nhau như thể đó là một chuỗi trông giống như thẻ. THRU là một hướng dẫn có nghĩa là "bỏ qua cho đến khi quy tắc tiếp theo được khớp, và sau đó đặt vị trí khớp vào cuối của những gì bạn vừa khớp." (TO là tương tự phù hợp, nhưng để lại vị trí phân tích cú pháp trước phần tử).

Vì vậy, chúng tôi zip dọc theo <a name="28154">. Sau đó, chúng tôi nén qua lần xuất hiện tiếp theo <code>, với vị trí phân tích cú pháp của chúng tôi hiện được đặt ngay sau >. Lệnh COPY của PARSE sau đó cho phép chúng tôi sao chép dữ liệu theo quy tắc khác, trong trường hợp này quy tắc đó là [TO </code>]... vì vậy chúng tôi nhận được vào biến C mọi thứ cho đến trước đó <.

Thật tuyệt phải không? :-)

Về mặt kỹ thuật, tôi có thể loại bỏ nó nhiều hơn, ví dụ bằng cách tìm kiếm TO "</"và lưu ba ký tự - không cần phải khớp toàn bộ </code>thẻ kết thúc khi cần </làm. Đối số tương tự tôi có thể thực hiện cho thẻ bắt đầu. Nhưng Rebmu là về chơi golf biết chữ ... ngay cả khi bạn có thể nghĩ rằng nó trông kỳ lạ lúc đầu!

CẬP NHẬT : /bodymánh khóe đã ra khỏi túi, nhưng tôi cũng sẽ để nó như vậy ... bởi vì tôi nghĩ nó mang tính giáo dục hơn theo cách này.

Java bây giờ 634, 852, là 1004

Mã đã được cập nhật; cảm ơn vì đã góp ý Đã chơi gôn: bây giờ thay thế & gt bằng>

//bacchus
package golf;
import java.net.*;
import java.util.*;
public class G{
public static void main(String[] a) throws Exception {
Scanner z;
URL u;
int x=0;
String s;
u=new URL("http://codegolf.stackexchange.com/questions/28154/write-a-program-that-downloads-itself");
z=new Scanner(u.openConnection().getInputStream());
z.useDelimiter("\\s*//bacchus\\s*");
while(z.hasNext())
{
s=z.next();
s=s.replace(">", ">");
if(x>0)System.out.println("//bacchus\n"+s);
x++;
if(x>2)break;
}
System.out.println("//bacchus\n");
}
}
//bacchus

Gửi để thử nghiệm, tôi sẽ chỉnh sửa và thử chơi golf ngay. Cần thay đổi x> 1 thành x> 2 vì chuỗi kiểm tra cũng nằm trong mã của tôi. Lưu ý: Mã golf thay thế> ký hiệu thành & gt.

//bacchus
package golf;
import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStream;
import java.io.InputStreamReader;
import java.net.MalformedURLException;
import java.net.URL;
import java.net.URLConnection;

public class Golf {

    public static void main(String[] args) throws IOException {
        URL u;
        URLConnection c;
        InputStream i;
        InputStreamReader r;
        BufferedReader b;
        String s;
        int x=0;
        try {
            u=new URL("http://codegolf.stackexchange.com/questions/28154/write-a-program-that-downloads-itself");
            c=u.openConnection();
            i=c.getInputStream();
            r=new InputStreamReader(i);
            b=new BufferedReader(r);
            while((s=b.readLine())!=null)
            {
                if(s.contains("//bacchus")) x++;
                if(x>0)System.out.println(s);
                if(x>2) break;
            }
            i.close();
            b.close();
        } catch (MalformedURLException ex) {

        }
    }

}
//bacchus

Python, 175 167 byte

Điều này sử dụng hai thư viện bên ngoài; Tôi đã không đọc rằng nó là trái phép.

import bs4,requests
print(bs4.BeautifulSoup(requests.get('http://codegolf.stackexchange.com/q/28154').text).select('#answer-28171')[0].select('pre > code')[0].string)

Mã dài hơn, nhưng đẹp hơn:

import bs4, requests
request = requests.get('http://codegolf.stackexchange.com/q/28154')
soup = bs4.BeautifulSoup(request.text)
answer = soup.select('#answer-28171')[0]
code = answer.select('pre > code')[1].string
print(code)

JavaScript, 228

r=new XMLHttpRequest()
c='code'
r.open('GET','//'+c+'golf.stackexchange.com/posts/28157/body')
r.onreadystatechange=function(){this.readyState==4&&alert((a=r.responseText).substr(i=a.indexOf(c)+5,a.indexOf('/'+c)-i-1))}
r.send()

Chạy trên trang này.

Haskell, 563 613 byte

import Control.Monad
import Data.List
import Network.HTTP
m%f=join(fmap f m)
q s=(simpleHTTP(getRequest"http://codegolf.stackexchange.com/questions/28154/write-a-program-that-downloads-itself?answertab=oldest#tab-top"))%getResponseBody%(putStrLn.head.filter((==)(s++show s)).map(take 613).tails)
main=q"import Control.Monad\nimport Data.List\nimport Network.HTTP\nm%f=join(fmap f m)\nq s=(simpleHTTP(getRequest\"http://codegolf.stackexchange.com/questions/28154/write-a-program-that-downloads-itself?answertab=oldest#tab-top\"))%getResponseBody%(putStrLn.head.filter((==)(s++show s)).map(take 613).tails)\nmain=q"

Thử nghiệm. Có hỗ trợ trang thông qua tính năng "bài viết cũ nhất". Sử dụng cấu trúc quine-line để tìm những gì cần in. Điều import Control.Monadnày chỉ bởi vì >>=tạo ra >trong HTML.

Javascript + jQuery, 87 , 67

Tôi không chắc chắn rằng tôi được phép sử dụng jQuery, nhưng:

$('body').load('//codegolf.stackexchange.com/posts/28268/body pre')

Javascript + jQuery, nếu được thực hiện trong trang này: 27 , 25

Để giải trí, nếu nó được thực hiện ở đây:

$('[id$=268] pre').html()

$('[id$=28268] pre').html()

w3m 45 ký tự

w3m codegolf.stackexchange.com/a/28336|grep ☻

Phi tiêu, 164

Tôi nghĩ rằng tôi đã thử điều này trong Dart, khá thú vị khi sử dụng imo.

Điều này có thể được chạy trong bảng điều khiển trong DartEditor, nhưng không yêu cầu gói http được thêm vào pubspec.yaml

import"package:http/http.dart"as h;h.read("http://codegolf.stackexchange.com/posts/28215/body").then((s){print(new RegExp(r"im.+(?:})").firstMatch(s).group(0));});}

Phiên bản bị đánh cắp:

import "package:http/http.dart" as h;

void main()
{
  h.read("http://codegolf.stackexchange.com/posts/28215/body").then((s)
  {
    print(new RegExp(r"im.+(?:})").firstMatch(s).group(0));
  });
}

R 114 ký tự

library(XML);cat(xpathSApply(xmlParse("http://codegolf.stackexchange.com/posts/28216/body"),'//code',xmlValue)[1])

Không có phép thuật thực sự ở đây: nó lấy giá trị của trường giữa các thẻ html <code></code>. Sử dụng thư viện XML(như người ta có thể thấy trong mã khá rõ ràng). Kết quả đầu ra là thiết bị xuất chuẩn.

Java, 300 294

import java.net.*;import java.util.*;public class G{public static void main (String [] a) throws Exception{Scanner s=new Scanner(new URL("http://codegolf.stackexchange.com/posts/28189/body").openConnection().getInputStream()).useDelimiter("./?[c]ode\\W");s.next();System.out.print(s.next());}}

Một phiên bản cải tiến của câu trả lời của bacchusbeale:

• không đóng tài nguyên một cách không cần thiết
• không khai báo các biến không cần thiết
• sử dụng a Scannerđể tránh phải lặp qua đầu vào
• sử dụng biểu thức chính quy không khớp với chính nó để tránh phải bỏ qua lần xuất hiện giữa của điểm đánh dấu bắt đầu / kết thúc.

Đã cập nhật:

• Sử dụng URL trực tiếp đến bài đăng, vì vậy chúng tôi không cần một nhận xét duy nhất để xác định bắt đầu / kết thúc mã; hiện sử dụng <code>[...]</code>làm dấu phân cách để tìm kiếm (thực sự sử dụng biểu thức chính quy "./?[c[ode\W", để tránh phải giải mã <và >- "\ W" là cần thiết thay vì ngắn hơn "." để tránh nó khớp một phần của URL với bài đăng, thật không may, có giá 2 ký tự và dấu ngoặc vuông xung quanh c ngăn chính regex khớp với chính nó).

w3m 55 byte

w3m codegolf.stackexchange.com/posts/28242/body|grep x

Dựa trên @DigitalTrauma

Ruby, 237 215 146 132

require'mechanize'
a=Mechanize.new
puts a.get('http://codegolf.stackexchange.com/a/28159').search('.lang-rb code:nth-child(1)').text

Chế biến, 90

print(loadStrings("http://codegolf.stackexchange.com/posts/28657/body")[2].substring(11));

Chỉnh sửa: Cuối cùng đã có nó!

bash + awk, 71 byte

curl -sL codegolf.stackexchange.com/q/28154 |awk -F\> '/\#/ {print $3}'

Javascript, 138

a=window.open("http://codegolf.stackexchange.com/posts/28160/body");setTimeout('alert(a.document.body.innerHTML.match(/a=.*9\\)/)[0])',99)

Điều này hoạt động giả định rằng trang tải dưới 99 ms. Nó cũng phải được chạy thông qua bảng điều khiển được mở trên trang codegolf.SE, vì cùng chính sách xuất xứ.

Perl 5.10, 155 127 122 117 byte

use XML::LibXML;say XML::LibXML->new->parse_file('http://codegolf.stackexchange.com/posts/28330/body')->find('//pre')

Sử dụng XML::LibXML.

Shell và xmllint, 82 byte

xmllint --xpath 'string(//pre)' http://codegolf.stackexchange.com/posts/28333/body

Con trăn, 164

Hoạt động bằng cách trích xuất văn bản giữa các thẻ mã. Nó khá dài nhưng nó sẽ luôn hoạt động chính xác trừ khi trang html được chỉnh sửa trực tiếp hoặc một khối mã mới được thêm vào trước khối bên dưới (có một khối mã sau sẽ không ảnh hưởng đến đầu ra của chương trình).

import urllib2
print urllib2.urlopen("http://codegolf.stackexchange.com/posts/28617/body").read().split(chr(60)+"code"+chr(62))[1].split(chr(60)+"/code"+chr(62))[0]