On Monday, March 17, 2003, at 06:11 PM, drieux wrote:
but if I do the sort of thing I would normally do
#!/usr/bin/perl -w
use strict;
our $s='$c = chr(39);
$t = q^#!/usr/bin/perl
$s=^.$c.$s.$c.q^;eval $s;^.\n;print $t
### execute-me
On Monday, Mar 17, 2003, at 14:15 US/Pacific, W. Blake wrote:
[..]
#! /usr/bin/perl
$s='$c = chr(39);$t = q^#! /usr/bin/perl
$s=^.$c.$s.$c.q^;eval $s;^.\n;print $t
### execute-me
[..]
';eval $s;
I just noticed one of those things I don't normally
take the time out to
On Mon, 17 Mar 2003, drieux wrote:
p0: thank for the URL's - forgive my lack of awareness
that this had been 'named'.
Oh yeah, and written about at great length :)
This URL gives a pretty good overview of the mechanics of quines: