超级混乱的Perl代码

时间：2007-06-10 来源：transfan

谁能想到它的运行结果会是那样……

（别指望下面的代码可以运行，可怜的“代码插入”功能，使代码更加混乱了 -_-! ）

$_='us!b{lJ$++$
                                                       ;=
                             A8 1;0 P@(=(\x$0
                           =,)( \y $0=,)(\X$
                         9=06,) (\ Y$$
                            =/X $ (=p .11 608
                            43) ) ;)H@( =, 0,0*2Y$2
                            ,$* , YX $0, 2, 627,33$,,
                            XY$ 5,601,04$ ,,Y Y$8 ,37
                            3,3 1$,,Y63,7 67, 63 5,
       93 7,3 6 3,726 ,67 4,3
     37, 354 , 366,7 83,786,05
   4,3 27,01 4,286,0 2 4,0 07,544,
  507 ,024,08 6,4
34, 507 ,0 34,296
,02 4)3 s} buR!r{na!d52}6us!b{rpsirtn"f%#20%x20%x20"xR,
R,R ,u} es T!;kM$
n=w eM! iaW nniod;w
;lM $>- ere pta9(,9us{b
fi0 (== f$+ +3% )2$
  {&V$&-Vp>ca Fk roe
    g;t;lV$$ =-MC
      >na av(s
      w-, iX$-
      ,eh $,)Y
      >-a pkc$
      }=u {$P$0[}](+{$
                                          P$2[}]$-${[P


                       ]0 )}$/;p V$ >-rca
   eeto Pylo g(nx$$,, yx$$ ,,Y X$$
  ,,YX$$ ,,yf-, i)r $;-Mu> dpt a;e
es el tc $(, aa$ $,, a2. ;){
        $P$0[} ]$= ;uuphsP@s ,ih tfP @@;
   =Q$( %J)2 (?f -,i)r(:o-t uil enw,ihe
  t;)V$> -rc aee trA (cR @-, tsr
a, tA $= -09 @,) Qhw li( e=0 $=%
        f61na@ d=R psi lec @(, H,0 )4} );)
         aMni oLp o';s* \s**xgs;s? !?$