For safety, I disabled Len's login and mangled his pw recovery email. He hasn't been here in years, and is probably unlikely to return, but if he does, we can easily reenable his login, and advise him not to mess with spiraling quine. :-)

> I disabled Len's login and mangled his pw recovery email.

Sounds complicated, I would just have reposted it as AnoMonk to make it immutable and change the URL.

 perl -MHTTP::Tiny -e 'eval HTTP::Tiny->new->get(shift)->{content}' https://perlmonks.org/?abspart=1;displaytype=displaycode;node_id=11159651;part=2

If there was a market for such a feature I'd invest into our own internal URL shortening "service".

#!/usr/bin/perl
$_='
         $q ="\                   47"; wh
        ile                           ($ ;=
      $z                +=              .5 ){
    %c=           $r=0;$/ ="";whi         le(2
   0+          $z>($;+=.05)){$c{int$       _+ 2
  6+         2*($              r+= .0       2) *
 s          in$                   ;}{1       -$_
+1         0+           int        $r*c       o s
$         ;}         =1for(0.       .1)        }$
t        =r         ever se;$        /.        =`
c        le        ar     `.         "         #!
/        usr       /bi             n/         pe
rl       \n\       $_ =$q        \n"          ;
fo        r$y        (1..20){$c{$_}          {
$ y       }? $         /.=chop$t            :
 ($/        . ="                          \4
 0")         for(0.                    .53)          ;
   $/.        ="\n"}pri            nt"$/$          q;
   s; ".         chr(9 2)."s;;g;eval\n           "}

';s;\s;;g;eval
[download]

Cheers Rolf
_{(addicted to the Perl Programming Language :)
see Wikisyntax for the Monastery}