Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: Quine Whine

by CiceroLove (Monk)
on Mar 06, 2001 at 08:43 UTC ( #62440=note: print w/replies, xml ) Need Help??

in reply to Quine Whine

I rememebr not too long ago someone doing something along the lines of:
__DATA__ print DATA;

I tried searching for it here but it didn't come up. I thought it one of the more clever ways to accomplish a quine.

Fates! We will know your pleasures: That we shall die, we know; 'Tis but the time, and drawing days out, that men stand upon. - Act III,I, Julius Caesar

Replies are listed 'Best First'.
Re^2: Quine Whine
by GrandFather (Sage) on Sep 30, 2014 at 23:23 UTC

    Maybe you are thinking of:

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


    seek *DATA, 0, 0; print <DATA>; __DATA__
    Perl is the programming world's equivalent of English

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://62440]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (2)
As of 2017-07-23 03:00 GMT
Find Nodes?
    Voting Booth?
    I came, I saw, I ...

    Results (343 votes). Check out past polls.