syntax error at =# line 2, at EOF
Execution of =# aborted due to compilation errors.

[download]

Save to a file named "=#". I vaguely recall a similar Perl quine but I was surprised at how long this took me to come up with. I even tested it on several versions of Perl on both Unix and Windows. (:

To validate that it is a quine under Unix (or WinNT and later, if you have a "diff" that knows how to read from stdin), use: perl "=#" 2>&1 | diff "=#" -

Update: In PerlMonk's tradition, I've done the search after creating the node and found that similar quine here. (:

        - tye (no, I don't want to stand too close to that)

Replies are listed 'Best First'.
Re: World's worst Perl quine
by blakem (Monsignor) on Oct 17, 2001 at 23:44 UTC
    Reminds me of one which I believe came from Dominus: 
    Illegal division by zero at /tmp/abc line 1.

    [download]
    Save in file '/tmp/abc' and run using 'perl /tmp/abc' ;-)

    Update: Dominus' original code

    -Blake

[reply]
[d/l]
Re: World's worst Perl quine
by Sweeper (Pilgrim) on Oct 18, 2001 at 09:47 UTC
    I think Douglas Hofstadter has said something about that in Metamagical Themas (not about Perl, but any programming language you would choose). This was, of course, in the chapter about self-references.
[reply]
World's most boring Perl quine
by cLive ;-) (Prior) on Oct 18, 2001 at 22:31 UTC
    save as "self". 
    open(SELF,'self'); print while(<SELF>);

    [download]
    cLive ;-)
[reply]
[d/l]

      I agree that depending on the name of the file is a cheat, so here's how another way to do it. (TIMTOWTC?) It's the same thing, but doesn't depend on the file name. 

      seek DATA, 0, 0; print while <DATA>;
__DATA__

      [download]

[reply]
[d/l]
[reply]
[d/l]
[select]
      I know writing quines isn't a serious subject (at least not to me), but is it fair practice to count on the name of the file to make the quine work? It seems like using metadata like that should be considered a cheat.

      Scott

[reply]

        No, not at all. Save the following script: print $0 to a file named 'print $0'.

        BTW, that's part of why "worst" is in the title.
                - tye (Sarcasm? What sarcasm?)
[reply]
[d/l]
      i had thought that quines had to print their code out without reading themselves in?

      strfry()
[reply]

Back to Obfuscated Code