$d=           
                                                   '~~_!~s*g!          
                                              ~m1f!~h      .b          
                                          )f!~d-           g*e         
                                      !~`-k*               e!~         
                                  ,q*d!                     z,u        
                              +c!w,                         _.n+       
                           c!u?g   +c!r.c+                  c-c,       
                         b!n,g+])f,a+b!l*^+c*a*g+           _,a!       
                      k)_)]1d       *a-^       *],a!k       )]*c1      
                  a0])`           .a!k ,^          ?c*a,     a!jK      
                `)]  0a!j       N],     ^)]           *`!j   Qa)]*     
               `!   hA _9^-`!g@a-        ]4]     +a!e:]  ,c, _7b!d     
               :^ +e*       a6b!c:_*b0     `5b!c@a*] /^    6a!b+]5     
               ],f0]  6a!a+^.]-],e2]6`!a*^.].]       ,e0     `5`!`     
              *_-^.],f/`5`!`(a-^)]+^*h,b5`!g+^)^+w    5a !g+^(_,i)     
              f5b!h)c-d,g/]+c!h)c/o1]*e!i(c+^.c6_)f!q )`+^3  `, `)g    
              !w)n,o!~h*r!~~_';$p=q{lambda(p):''.join(fi     lt er(    
            lambda(q):not(q.isspace())   ,p))};$x=q{lambda(  p),q,x    
           ,d,t:((lambda(b),z:"".joi     n([[z[ min(len(eval( p)(b     
         [0:i+1])),len(z))-1 ],b[i       ]][b[   i].isspace()]for      
        (i)in(range(len(b))  )]))         (""     .join([[chr(10)      
       ,"x"*(ord(i)-39),ch   r(3      2)*(ord(i    )-92)][int((or      
       d(i)+13)/53)]for(i)in(eva     l(p )(d))]),  eval(p)("$d='%s     
      ';$p =q{%s};$x=q{%s };$q=          q{%s};$q= ~s/\s//gs;eval$     
     q;"%  (d,p,q, x))))# };$q=         q{$t='"'x(3 );@b=("print(la    
     mbd  a(p),q, z,zz,x, d:eva         l(eval(p)    (q))(p,q,x,d,'    
    $t'   ))($t$  p$t,$t$ x$t,$          t$q$t,$t    $x$t,$t$q$t,$t    
    $     d$t)"=  ~/ \S/g  s);            map{p      rint(($i=ord)<    
           39?c  hr  (10)                           :$i<92?chr(32)     
           x($i  -   39):s             pl          ice(@b,0,$i-92      
            ))       ;}("$d        !"=~/           \S/gs);# str.       
            up       per((lam                   bda(x):chr (or         
             d       (x[-  4])+6)+       x[2:4])("+Lunat   ic          
                     +"    ))};  $q=~s/\s//gs    ;eval    $q           
                           ;;                  ;;;;;                   
                                              ;;;