use strict;BEGIN{\$SIG{qq)__WARN__)}=sub{\$..=\$_[\$===!\$=]}}eval,\$..=\$@for qq}bless("Wall","Larry"),Not("Wall","Russ");#},qq!;print Magic,counts!, qq#use strict;\\$Perl=42#,qq>goto"WALL, LARRY ONTO (OR ON?) SOMETHING">, q~warn+Randal::Nevermind()~;s~~pop~e;\$~=/^[1-7]\$/?~-\$&:rand\$=>>\$^F+!\$%; @; =( q~ -F+=->*/+/*+*W*. -> */ *.+=*+*.*/+/*+*3*/-B*+* ,+ 1* +*1*\*\*\*,*2*D*2*:*c*W*,+1*\* \* \* ]~,q~ -Z*- *c */ *:*2 *c* W* ,+ 1*2+ 1*/ *7 *< */*. + =*2 */ +1 *++` * /*c +` */ +1*+ *G , I+= *. *2 *:*/ * A *+* c* 2* /*W *, -> */* 1* 7* 7,G *2 + 1*/ *7 *D *2* :*/* c +`* /* 3+ =*7 *G*1 + 1*2 *: */ *+* .*]* 3 *7* c* 2* /,, *2*:*1*/. + */* A* 7+ 1*2 -> * /* +* ,+ 1*/ *3 * +* W+ 1- >*/ , * -: += *+ *.* / *W*3* /* .+ =*+ * .- >* /* 3+/ * 2*+*:*W*,,I-Q,**]~,q~-F*0*D*W*7*G*3*1+ `* /- Z*/ +/*+*3*/*2*W *.+=*2* : * /*7*,*. * 7* /* 3*7 * c *2* .+= *W * , ,I ->* /*7 * :* /* 7*, * / *3*7*c*2*.+= * W *,,I*\*]~,q~ - ;* 1* 1*/ * 1 * + * ,, I* G* +,I * 2 * /+ 1 *2 *3 *W , I*,*2 * : *3 * /* +* :* 2 * / * + * :* :* 7, I *+* ,*.*\*/+X*7*2*3 * /+/*W*.+=*/* .+ =* 2* / * . * 2* :* : * W * . *7 *: + ` * \*\ * \ */ .R * 9*T *] ~ ,q ~- Z * .*-*3*/*.+=*2*/-V*+,I * W* A* / * .+=*+*.*/*A*7*G*,*.*3*\* ] ~, q~ - B *+*,+1*+*1*/*A*+*,*/+/*:*W * .* 2* / * 7*,*2 *9*1*W*,*2*:*3 */*+ , I* +* W * ,*\* / - W*D * 2* :+ `* 7*, *2*/*W*3*/+=*+,= ,=+ `- >* / * +* ,+ 1 * /, =* 2 * +* A* 2 * / *3 ,= * : * 2* ++ 1 * 3 *] *7 * D * 2* :* / * . + =* 2* / + / + =* 7* 1 *2* /- W *+ *: * .+=*\*]~,q~ - Z* /, G* ,*7+/*/*W*.*-*3*/+/*2*W*:+1->*/*0*G*.*/*W*.*/+1*7*2*3*/*c*+,G*2*/*W*.*/ *2*+*3*W*2*:*/*.*7*/+/*:*W*.*2*/,=*7*2*.*:+`*/*W*,*/,=*2*:*1*\*/.R*9*T* ]~);s;\s;;gfor@;;@;=map{\$;=chop;\$=*(-42+ord)-42+ord\$;}\$;[\$~]=~/../g;#;- print((\$.=~/./sg)[@;]) #-!"#\$%&'()*+,-./:;<=>?@[\]^_`!"#\$%&'()*+ -- /-\