Langjähriger Lauerer, erstmaliges Poster. Also geht es los.

Auf der Wikipedia-Seite für quine heißt es, dass "ein quine als 'betrügerisch' angesehen wird, wenn es seinen eigenen Quellcode betrachtet." Ihre Aufgabe ist es, eine dieser "Cheating Quines" zu erstellen, die ihren eigenen Quellcode liest.

Das ist Code-Golf , also gewinnt der kürzeste Code in Bytes - in jeder Sprache . Dies bedeutet, dass ein 5-Byte-Python-Skript kein 21-Byte-Python-Skript übertrifft, sondern ein 15-Byte-Python-Skript.

Sie müssen Datei-E / A verwenden, um den Quellcode zu lesen. Daher ist der folgende JavaScript-Code von der offiziellen Wikipedia-Seite ungültig:

function a() {
    document.write(a, "a()");
}
a()

Es muss auf den Quellcode der Datei auf der Festplatte zugreifen .

Sie dürfen den Dateinamen nicht angeben. Sie müssen dafür sorgen, dass der Dateiname selbst erkannt wird.

Jeder klar? Gehen!

Zsh , 4 Bytes

<$0

Die Z-Shell verfügt über integrierte Funktionen für Katzen. Das vierte Zeichen ist ein Zeilenvorschub.

Probieren Sie es online!

Der Code hängt in keiner Weise vom Dateinamen ab. Dies funktioniert auch dann, wenn der Dateiname Sonderzeichen wie Leerzeichen oder Zeilenumbrüche enthält.

Testlauf

$ cat "my quine.sh"
<$0
$ zsh "my quine.sh" 
<$0
$ diff -s <(zsh "my quine.sh") <(cat "my quine.sh")
Files /dev/fd/63 and /dev/fd/62 are identical

Bash, 6 Bytes

cat $0

Grundsätzlich gilt.

Ausführbarer UNIX-Loader, 10 Byte

#!/bin/cat

Wenn Ihnen Spam bei Standardfehlern egal ist, können Sie ihn um ein Byte kürzer machen:

#!/bin/dd

C 52

s[99];main(){read(open(__FILE__,0),s,99);printf(s);}

Dies liest natürlich den Quellcode und nicht das kompilierte Programm - ich gehe davon aus, dass dies innerhalb der Spezifikation liegt.

PHP, 21 Bytes

<?=file(__FILE__)[0];

fileLiest eine Datei zeilenweise in ein Array und die Datei hat nur eine Zeile. Das spart ein Byte im Vergleich zu readfile(__FILE__).

Perl, 15 Bytes

open 0;print<0>

3 Bytes gespart dank @ ThisSuitIsBlackNot !

Perl 6, 20 Bytes

print slurp $?FILE

Ich habe nicht sehr lange mit Perl 6 gearbeitet, daher bin ich mir nicht sicher, ob es irgendwelche Tricks gibt, um dies zu verkürzen.

osascript (AppleScript von der Kommandozeile), 40 33 32 Bytes

(lies den Pfad zu mir) 's Absatz 1

Ausführen einer Datei mit dem Namen a mit osascript a.

Ruft den ersten Absatz (die erste Zeile) der Datei ab und druckt ihn mit einer nachfolgenden neuen Zeile in STDOUT aus, daher die neue Zeile im Code.

Python 2, 32 Bytes

Am Ende der Datei befindet sich eine neue Zeile.

print open(__file__).readline()

Python 3, 33 Bytes

Am Ende der Datei befindet sich eine neue Zeile.

print(open(__file__).readline())

Dank feersum für das Auffangen eines Problems und das Bereitstellen von Informationen__file__ , Loovjo für einen neuen Ansatz für die Python 2-Lösung, mit der 17 Byte eingespart wurden, und Skyler für eine Lösung, mit der noch ein weiteres Byte eingespart wurde und die sowohl in Python 2 als auch in Python 3 printfunktioniert hat (anhängig , eine Funktion in Python zu sein) 3)!

Doku-Link für readline

Stapel, 9 8 Bytes

@type %0

Ein Byte dank @Joshua gespeichert

Python 2.7, 30 Bytes

print open(__file__).read(29)

Bearbeiten: Nur um klar zu sein, der obige Code soll am Ende eine neue Zeile als 30. Byte haben. Ich kenne Markdown nicht gut genug, um herauszufinden, wie es im Codeblock angezeigt wird.

Ich verwende hier den gleichen Trick wie in meiner C-Vorlage. Dadurch wird die gesamte Quelldatei mit Ausnahme der nachfolgenden Zeile gelesen, um den zusätzlichen Zeilenumbruch zu berücksichtigen, der printan die Ausgabe angehängt wird.

Java, 212 196 Bytes (171 Bytes mit fragwürdigen Hardcodierungsregeln)

Vielen Dank an @Cruncher für die Kürzung um ~ 15 Bytes!

Ich habe keinen Zweifel, dass dies Golf gespielt werden kann.

import java.nio.file.*;class A{public static void main(String[]a){new A();}A(){try{System.out.print(new String(Files.readAllBytes(Paths.get(getClass().getName()+".java"))));}catch(Exception e){}}}

Oder eine andere Methode mit der statischen Methode (und dem Namen der Klasse), ich bekomme 171 Bytes. Ich bin mir jedoch nicht sicher, ob dies als fest codiert qualifiziert ist.

import java.nio.file.*;class A{public static void main(String[]a)throws Exception{System.out.print(new String(Files.readAllBytes(Paths.get(A.class.getName()+".java"))));}}

Verwendet einen Konstruktor, um den Klassennamen mit einer nicht statischen Methode abzurufen. Die Verwendung einer statischen Methode ( A.class.getName()) war wirklich hart codiert, daher habe ich die "richtige" Methode verwendet. Bei Verwendung von A.class.getName()wird dieser Code auf 171 Byte verkürzt.

Lesbare Versionen:

Konstruktor verwenden und this.getClass():

import java.nio.file.*;
class A{
    public static void main(String[]a) {
        new A();
    }
    A(){
        try{
            System.out.print(
                new String(
                Files.readAllBytes(
                Paths.get(
                getClass().getName()+".java"))));
        }
        catch(Exception e) {}
    }
}

Mit statischer Methode A.class.getName():

import java.nio.file.*;
class A {
    public static void main(String[] a) throws Exception {
        System.out.print(
             new String(
                  Files.readAllBytes(
                       Paths.get(
                            A.class.getName()+".java"))));
    }
}

Erfasst alle Bytes der Datei auf einmal und gibt sie an STDOUT aus. Ziemlich einfach.

AutoIt, 34 Bytes

Gibt sich in die Zwischenablage aus:

ClipPut(FileRead(@ScriptFullPath))

Rubin, 14

$>.<<IO.read$0

Go, 111 105 Bytes

package main
import("io"
."os"
."runtime")
func main(){_,p,_,_:=Caller(0)
f,_:=Open(p)
io.Copy(Stdout,f)}

Mein erstes Code-Golf in Go - nur ein paar Tricks, die Sie hier anwenden können, denke ich.

PowerShell, 39 36 31 25 Bytes

Etwa so eng wie ich es kriegen kann:

gc $MyInvocation.MyCommand.Path | oh

Aufgrund der großen Nachfrage wurde dies geändert in:

gc $PSCommandPath|echo -n

Druckt auf die aktuelle Standardausgabe der Host-Shell .

Ruby, 15 Bytes

$><<IO.read($0)

Quelle: https://stackoverflow.com/questions/2474861/shortest-ruby-quine

C 49 Bytes

s[];main(){read(open(__FILE__,0),s,48);puts(s);}

Bearbeiten: Zur Verdeutlichung ist das 49. Byte eine neue Zeile.

Dies liest den Quellcode abzüglich der Newline am Ende, um die Newline zu berücksichtigen puts, die am Ende der Ausgabe angehängt wird.

Mathematica, 16 Bytes

FilePrint@$Input

Führen Sie es im Skriptmodus aus .

Pyth, 25 Bytes

$import sys$h'e$sys.argv

Dies liest seinen Dateinamen. Im Wesentlichen sucht es argv, öffnet die Datei, die dem letzten Argument entspricht, und gibt die erste Zeile aus.

Los, 133 Bytes

Jeder klar? Gehen!

package main
import("fmt"
"io/ioutil"
"runtime")
func main(){_,f,_,_:=runtime.Caller(0)
s,_:=ioutil.ReadFile(f)
fmt.Print(string(s))}

> <> , 13 Bytes

0:0go:c=?;1+!

Getestet sowohl mit Online- als auch Offline-Dolmetschern. Der gBefehl kommt dem Lesen aus der Quelldatei am nächsten. Wenn er für diese Herausforderung nicht zählt, markiere ich meinen Eintrag als nicht konkurrierend. Ich glaube, es wird normalerweise als "Betrug" für Quines angesehen.

Probieren Sie es online aus.

Haskell, 63 Bytes

Für die Wissenschaft!

import System.Environment
main=getProgName>>=readFile>>=putStr

> <> 31 Bytes

Haftungsausschluss: Es gibt keine Datei-E / A in> <>, ich fand es jedoch interessant, die von Befunge geerbten Codespace-E / A zu präsentieren, eine der Sprachen, die> <> inspiriert hat.

00voa0+1;!?$~<
1+> :r:@g: ?!^o$

Eine selbstlesende Quine, die ich vor einiger Zeit gemacht habe, können Sie hier ausprobieren .

Ich habe gerade gesehen, dass es eine kürzere Quine gibt, die sich selbst liest . Während es in Code-Golf-Standards eindeutig besser ist, möchte ich darauf hinweisen, dass es eine fest codierte Codelänge hat, während meines zusätzliche Codezeilen oder -spalten kopieren würde (solange sie nicht den ursprünglichen Code brechen).

F #, 54 Bytes

printf"%s"(System.IO.File.ReadAllText __SOURCE_FILE__)

Verwendungszweck:

fsi --exec a.fsx

Perl 5, 15 13 Bytes

Wir danken der Bash-Lösung, die dies inspiriert hat:

print`cat $0`

EDIT: Benötigen Sie nicht das Semikolon oder das erste Leerzeichen.

Node.js, 66 63 Bytes

p=process;p.stdout.write(require('fs').readFileSync(p.argv[1]))

console.logWird nicht verwendet , wodurch eine neue Zeile angehängt wird.

C 31 Bytes

main(){system("cat "__FILE__);}

Die Bash-Lösung ist so kurz, warum also nicht eine C-Lösung darauf aufbauen?

Haskell , 49 Bytes

{-#LANGUAGE CPP#-}main=putStr=<<readFile __FILE__

Probieren Sie es online!

(GHC) Haskell verfügt über eine Erweiterung für die Verwendung des C-Präprozessors (häufig für die Portabilität zwischen Versionen und Architekturen verwendet). Hoffentlich selbsterklärend.

HTML mit JavaScript, 115 Bytes (zählt nicht wirklich)

<!DOCTYPE html><html><title>x</title><script>alert(new XMLSerializer().serializeToString(document))</script></html>

Zählt das? Es macht mir nichts aus, es hat Spaß gemacht :)

Technisch gesehen öffnet es keine Datei. Es ist auch ein wohlgeformtes HTML5-Dokument. Der XMLSerializer war das einzige Tool, das auch den DOCTYPE-Teil zurückgab, der jedoch nicht dem Standard entspricht. Trotzdem funktioniert es mit Chrome und Firefox, und ich wette, andere Browser.

Und als Bonus:

JavaScript, 41 Bytes

alert(document.currentScript.textContent)