Hi folks,
I know this is not really perl related, but here's a solution for the hole
secret (taken from tpr0,1) written in befunge:
__BEGIN__
v > : :19p :17p 118p > 73+ `! #v _ v
^ : p71 : /+55 p6 p81 +1: g81 %+55 : g71 <
^ < v +1 g81 : g6 g81 < $$$$$$$$$$$$ p81 1 p6 p82: g81 <
, > : 18p 28g `! #^_v
^ <
+ > $ 049p 318p v
7 v * +55 + g94 +1 %9 -1 + <
3 > 49p 18g : 1+ 18p 28g `! #^_v
. | ` +55 : ,+37. : / +55 g94 <
: @
>& : 55+ ` #^_ .37+,@
__END__
(As number of spaces is important, you'll find the file attached).
Anybody wants to try it in brainf*k, intercal, malbolge or dis? :)
Jerome
--
[EMAIL PROTECTED]
v > : :19p :17p 118p > 73+ `! #v _ v
^ : p71 : /+55 p6 p81 +1: g81 %+55 : g71 <
^ < v +1 g81 : g6 g81 < $$$$$$$$$$$$ p81 1 p6 p82: g81 <
, > : 18p 28g `! #^_v
^ <
+ > $ 049p 318p v
7 v * +55 + g94 +1 %9 -1 + <
3 > 49p 18g : 1+ 18p 28g `! #^_v
. | ` +55 : ,+37. : / +55 g94 < <
: @
>& : 55+ ` #^_ .37+,@
