Re: No more art for me

Don't give up so easily, muntfish. If you're willing to take a few liberties, you can still (sort of) make your code look like a fish (the outline is taken from your former post):

             #/
            #/
          $==0;
       use strict;          #/
   s;;\$fuh;;eval;print   map
{$=-=0x4D-ord;$@=~m;.{$=}(.);;
   $1}qw;~ - k C 8 _ G    C;;
       use strict;          #\
          $==0;
            #\
             #\
[download]

As a side note, I think you've made an outstanding improvement from your last entry. I especially like your use of the semicolon as your regex separator and your cryptic use of the $@ variable. I have to admit, I didn't know what was going on at first glance.

Comment on Re: No more art for me Download Code

Replies are listed 'Best First'.

Re^2: No more art for me
by muntfish (Chaplain) on Aug 27, 2004 at 20:33 UTC

Thanks - that's great! I think perhaps code is easier to make into "shapes" than data... there's more scope for "tricks" like comments and such like. Maybe that's where I was going wrong...

As a side note, I think you've made an outstanding improvement from your last entry

Cheers. I've only just started looking at all the many ways of obfuscating - it's a totally different way of thinking, isn't it?

I especially like your use of the semicolon as your regex separator

Yeah, I wanted to use $; instead of $= as well - but I just couldn't make it work in the regexp!

and your cryptic use of the $@ variable

I saw that idea somewhere else, ages ago - can't remember who or where. To be honest I only tested this in v5.8.0 - no idea if it still works in other versions!

Have a good (long, if in the UK) weekend, everyone!

s^^unp(;75N=&9I<V@`ack(u,^;s|$.+\`|"$`$'\"$&\"$"|ee;/m.+h/&&print$&

[reply]
[d/l]
[select]


Syntactic Confectionery Delight
	PerlMonks