Created
September 16, 2010 12:59
-
-
Save faultier/582383 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
eval($s=join("",qw{$t=1;$s=~/\[[0-9,]+\]/;$n=eval($&);$e='eval$s=%w'.chr(39).'t= | |
true;e="eval($s=join( "<<34<<34<<",qw{$t=1;$s= ~/"<<92<<"[[0-9,]+"<< | |
92<<"]/;$n=eval($&) ;$e="<<3 9<<"eval$s=%w"<<39 <<". chr(39)."<<39<< | |
($s+(($s.length>17 56)?"":"#"<<$ s.gsub (/[^0-9a-zA- Z]/,"")[0,(17 | |
55-$s.length)])); e[-312,311]=""<<3 9<<";$e.=("<<39<< "#"<<39<<". | |
substr(join("<<3 9<<39<<",split(/[^0-9 a -zA-Z]/,$s)),0,(200 9-length( | |
$s)))).chr(39)." <<39<<".join"<<39<<";@o =map{$t=!$t;split(//, ((!$t)?s | |
ubstr($e,0,$_," <<39<<39<<"):chr(32)x$_ ))}@$n;for(1 . .34){spl | |
ice(@o,$_*81,0, chr(10))};print(join("< <39<<39<< ",@o).chr | |
(10))}))";o=[1 01,10,24,4,40 ,3 , 8,4,18,3, | |
4,6,33,2,13,3, 6,10,12,3 , 30,2,17, | |
14,17,2,27,2,2 1,3,1,7, 1 9,2,25,1 | |
,23,9,21,2,2 3,2,23, 9 , 1 2 ,6,1,4, | |
23,1,23,1 1,9,12 , 2 3 , 2 ,13,4, | |
2,21,1,1 4,23,2, 9, 2 7 ,1 ,19, | |
22,1,8,1 9,1,29, 20, 3,7,9 ,1 ,18 ,1 | |
,4,1,3,1 ,13,16,6 ,6 ,6,1,9,1 ,8,1 ,10 ,1,11 | |
,1,4,14 ,6,7,26,2,1 1,1 ,4 , 1,4, 2,4,12 ,6,7,19 | |
,3,5, 5,3,2,14,3,3, 1 0 ,5,8 ,13,2,2,8,2,4,3,3, 1 5 ,5,2,7, | |
4,11, 10,3,4,2,4,1 ,2,4, 1, 6,14,12,4,13,6, 1 ,2,1,3, | |
4,5 ,18,3,1,3,1,3, 12,3,1 2, 13,5,1,2,4,15 , 1 ,1,11,10,3 | |
,1 4,12,6,1,2,5,13, 2,1,1,1 ,6,12,2,16,11 , 7,8,13,2,1, | |
7, 13,1,18,10,8,6,14, 1,2,10,1 0,1,20,12,5,3, 12 ,1,6,13, | |
7, 2,19,13,26,14,7,2,16 ,16,1 1,1,13,14,8, 2,14,1 6,13, | |
7, 5,15,10,3,8,10,1,8, 25,10,1,4,13,27,23,12,4,2, 12,5 | |
,1, 1,1,8,1,13,17,10 ,1,3,5,1,12 ,14,4,8,4,10, 2,13 | |
,25, 2,3,9,4,2,1,3, 15,13,33,4,5, 1,4,3 ,20, | |
8,182] .map{|i| t =!t;((!t)?e.slice!(0,i):3 2 .chr | |
*i)}.join ;1.upto(35){|i|o[(i*81) -1,0 ]=1 | |
0.chr};pu t s ( o)#ttrueeevalsjoi n 3434q wt1s | |
920992ne vale 39ev al sw39chr3939ssleng | |
th1756sg sub 09az A Z01755slengthe3 1231139e3939substrjo | |
';$e.=('#'.su bstr( join ('',split(/[^0-9a-zA -Z]/,$s)),0,(2009-leng | |
th($s)))).chr(39).'.join';@o=map{$t=!$t;split(//,((!$t)?substr($e,0,$_,''):chr(3 | |
2)x$_))}@$n;for(1..34){splice(@o,$_*81,0,chr(10))};print(join('',@o).chr(10))})) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
eval$s=%w't=true;e="eval($s=join("<<34<<34<<",qw{$t=1;$s=~/"<<92<<"[[0-9,]+"<<92< | |
<"]/;$n=eval($&);$e= "<<39<<"eval$s=%w"<<39<< ".chr(39)."<<39<<($s+( | |
($s.length>1756)?" ":"#"<<$ s.gsub(/[^0-9a-zA- Z]/, "")[0,(1755-$s.l | |
ength)]));e[-312, 311]=""<<39<< ";$e.= ("<<39<<"#"< <39<<".substr( | |
join("<<39<<39<< ",split(/[^0-9a-z A-Z]/,$s)),0,(200 9-length($s) | |
))).chr(39)."<< 39<<".join"<<39<<";@o = map{$t=!$t;split(// ,((!$t)?su | |
bstr($e,0,$_,"< <39<<39<<"):chr(32)x$_) )}@$n;for(1..34){spli ce(@o,$_* | |
81,0,chr(10))} ;print(join("<<39<<39<< ",@o).chr(10 ) )}))";o=[ | |
101,10,24,4,40 ,3,8,4,18,3,4,6,33,2,13 ,3,6,10,1 2,3,30,2,1 | |
7,14,17,2,27, 2,21,3,1,7,19 ,2 , 25,1,23,9, | |
21,2,23,2,23, 9,12,6,1, 4 ,23,1,23, | |
11,9,12,23,2, 13,4,2,2 1 ,1,14,23, | |
2,9,27,1,19 ,22,1,8 , 1 9 , 1,29,20, | |
3,7,9,1, 18,1,4 , 1 , 3 , 1,13,16 | |
,6,6,6, 1,9,1,8 ,1 , 1 0, 1,11, | |
1,4,14, 6,7,26, 2,1 1,1,4 ,1 ,4, 2,4 | |
,12,6,7 ,19,3,5, 5, 3,2,14,3 ,3,1 0,5 ,8,13 , | |
2,2,8, 2,4,3,3,15, 5,2 ,7 , 4,11 ,10,3, 4,2,4,1, | |
2,4, 1,6,14,12,4,1 3 , 6,1, 2,1,3,4,5,18,3,1,3 , 1 ,3,12,3, | |
12,1 3,5,1,2,4,15 ,1,1, 11 ,10,3,14,12,6,1 , 2,5,13,2 | |
,1 ,1,1,6,12,2,16 ,11,7, 8, 13,2,1,7,13,1 , 1 8,10,8,6,14 | |
, 1,2,10,10,1,20,1 2,5,3,1 2,1,6,13,7,2, 1 9,13,26,14,7 | |
, 2,16,16,11,1,13,14 ,8,2,14, 16,13,7,5,15,1 0, 3,8,10,1, | |
8 ,25,10,1,4,13,27,23, 12,4, 2,12,5,1,1,1 ,8,1,1 3,17,1 | |
0 ,1,3,5,1,12,14,4,8, 4,10,2,13,25,2,3,9,4,2,1,3 ,15,1 | |
3, 33,4,5,1,4,3,20, 8,182].map{ |i|t=!t;((!t) ?e.sl | |
ice !(0,i):32.chr* i)}.join;1.up to(35 ){|i| | |
o[(i* 81)-1,0] = 10.chr};puts(o)#ttrueeeva l sjoin | |
3434qwt1 s920992nevale39evalsw39 chr3 939s | |
slength1 7 5 6 sgsub09azAZ01755s l ength e3123 | |
1139e39 39su bstr jo #t1s09nevaleevalsw | |
chr39tt rue eeva l sjoin3434qwt1s9 20992nevale39evalsw39 | |
chr3939sslen gth17 56sg sub09azAZ01755slengt he31231139e3939substrjo | |
in3939split09azAZs02009lengthschr3939join39omapttsplittsubstre03939chr32xnfor134 | |
spliceo810chr10printjoin3939ochr10o10110244403841834633213361012330217141'.join |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment