It Came From the Crypt!

#!/usr/bin/perl

# It Came From the Crypt!



                                        $q=
                        q&9RM        8  ba1c
                       HtJprcG        6SJ3dk
       aQM             8  p  j         p8vsY
      i3UnT f          kcRJk9w          xW2v
       h2GVK3          YL1gNvf          YEX
        dBQdE           TIdpMu         WD9Y 
         CAvK0      BrsuKn9kXUwk     aNpj8q
         ISZgRZkUg2I8W9jJsG8Rg9yeE8LvqZR7A
         Ho PDIRVAVCgafA9MZjFb31Ea5bqr7gCg
         X    zPpgkPsHjTP8iC2TtVYE0PUR b z    
         Y    b3  EQiZrZiIm6Nc81WY  qs U g 
              7m  QzHM2VjY62II5Bg   7N e k
              kt  7 5JLD86&;$u=$q   =~ s &
              \s    &&xg&&-2;@v=    unpack
              q     &c3&,qq&i\nm       &;  
                     unshift@v,2       **
                     2*2**2*2;%l       =
                      map{chr$_}
                     reverse@v;$i
                   =2*2*2&&$q,$q
                   =$i&&8; while(
                 $i=~m& [^ *]{$q}
                &x){$y  =   substr
               (crypt(       $&,$&),
               $u,print     );print       !
                 $l{$y}      &&$y       ne 
                 "y"?$y:     $l{$y} ;$i=~
                 s+$&+ +x     }$y=~m
                &ymum    ~      
                my&
[download]

Just a little something to get into the Halloween spirit.

joecamel

Comment on It Came From the Crypt! Download Code

Replies are listed 'Best First'.
Re: It Came From the Crypt! by theorbtwo (Prior) on Oct 07, 2001 at 14:32 UTC
Amazingly enough, running this through O::Deparse seems to change the result of the run. I'm baffeled... but may just need sleep.	[reply]
Re^2: It Came From the Crypt! by ysth (Canon) on Dec 13, 2004 at 02:43 UTC
For me, it (running via O::Deparse) works on 5.8.0 but not on 5.6.2.	[reply]
Re: It Came From the Crypt! by hopes (Friar) on Oct 07, 2001 at 19:50 UTC
I think it's really very good... Great!	[reply]
Re: Re: It Came From the Crypt! by tretin (Friar) on Oct 08, 2001 at 05:55 UTC
Very cool!	[reply]
Re: It Came From the Crypt! by Anonymous Monk on Oct 12, 2001 at 04:40 UTC
cool	[reply]


There's more than one way to do things
	PerlMonks