in reply to One more quine
in thread How I Learned About Quines

Alphabetic quine

s sslcsene s sa zs sgxlt print lc for uc sazsslcseneazsazsaazzsazsgxltazprintazlcazforazucaz

update: fixed for perl 5.8 thanks to choroba

s ssab x ab ttucte x ab ttab ababt x ab ta btabtgx x print lcs x s ttucte x s tts sst x s ta btstgx x print lc

Pack ascii quine

+print pack'h*a*',$x,$x=b2072796e64702071636b67286a216a272c24287c24287d3

And another printf quine

printf'%s(%1$s)',q(printf'%s(%1$s)',q)

Replies are listed 'Best First'.
Re^2: One more quine
by choroba (Cardinal) on Apr 20, 2010 at 14:01 UTC
    perl -e 's sslcsene s sa zs sgxlt print lc for uc sazsslcseneazsazsaazzsazsgxltazprintazlcazforazucaz'

    gives:

    s sslcsene s sa zs sgxlt print lc for uc s sslcsene s sa zs sgxlt print lc for uc

    Which is not the same :(

[reply]
[d/l]
[select]
      Which is not the same :(

      Works for me on 5.10. Nice job mtve!

      --
       David Serrano
       (Please treat my english text just like Perl code, i.e. feel free to notify me of any syntax, grammar, style and/or spelling errors. Thank you!).

[reply]
        5.8.8 here.
[reply]

      indeed it wont work on 5.8, it's a bug in perl. compare

      print lc, uc for uc abc

      with

      print lc, uc for uc 'abc'

      for now i don't know how to fix it.

In Section Meditations