Very Simple

#!/url/bin/perl
$_="  .1.
     .601.
    .62151.
   .1561640.
  .400421121.
 .65163164040.
.1011561571641.
888888858888888
.0145162040120.
 .14516215404.
  .011014114.
   .3153145.
    .16204.
     .207.
      .3.
";s|[^0-7]||g;s|(.)(.)(.)|
chr($1*64+$2*8+$3)|ge;eval;
[download]

Comment on Very Simple Download Code

Replies are listed 'Best First'.
Re: Very Simple by Dominus (Parson) on Apr 13, 2001 at 03:58 UTC
Very handsome! But I think it might have been more fun if you had written the character codes in base 7 or base 9 instead of base 8. With base 8 codes it makes me wonder why you didn't do `s/.../"\"\\$&\""/ege;` [download] which I think might have been a little more amusing and a bit more obfuscated.	[reply] [d/l]
Re: Re: Very Simple by iamcal (Friar) on Apr 17, 2001 at 11:38 UTC
ooh - i like the double use of e. you can be sure i'll use that in future. or maybe base 7 or 9 using a different character range - letters or symbols perhaps.	[reply]