in reply to (jeffa) Re: Quine??
in thread Quine??

And since we are at it, why not golfing it as well? :)
#        1         2
#2345678901234567890
@ARGV=$0;print for<>

[download]
 _  _ _  _  
(_|| | |(_|><
 _|

[download]

Replies are listed 'Best First'.
Re: Re: (jeffa) GOLF Re: Quine??
by ChOas (Curate) on Mar 08, 2002 at 14:51 UTC 
    #        1         2
#2345678901234567890
@ARGV=$0;print<>

    [download]

    Or... for unix: 
    #        1         2
#2345678901234567890
system cat,$0

    [download]

    GreetZ!,
      ChOas

    print "profeth still\n" if /bird|devil/;
[reply]
[d/l]
[select]

      system cat,$0 

      #23456789_1
exec cat,$0

#23456789_12 # newline is required ;)
die`cat $0`

      [download]

      44696420796F7520732F2F2F65206F
7220756E7061636B3F202F6D736720
6D6521203A29202D2D204A75657264

[reply]
[d/l]
      Or, same number of strokes, but TMTOWTDI:
      #        1         2
#2345678901234567890
print`cat $0`

      [download]
      "One word of warning: if you meet a bunch of Perl programmers on the bus or something, don't look them in the eye. They've been known to try to convert the young into Perl monks." - Frank Willison
[reply]
[d/l]

In Section Cool Uses for Perl