I just turned 15 yesterday, so I thought I'd make a little something.
On an unrelated note, school ended yesterday as well, so it's not like I was bored or anything ;-)
Enjoy!
f(e( ));sub a{%cp= (''. '131',[8,3 ], '1'. '30', [2], '12'. '2', [21],'129',[ 15, 11, 23], ''. '1'. '19',[9,18], '1'. '16', [10,22,14], '125', [6],'1'. '26', [7],'1'. '23 +', [16], '2'. '5',[ 25], '95', [13], '61', [24 +], '114',[20], '47',[4,17 ,12],'112',[19, 5],'' .'1 +32',[1], '89', [0] ) ; %cp; }sub + b { 15;} sub c{ $e= $_[0] -15; $e;} + sub d {chr ($_[ +0]);}sub e { %cp = a(); @cs=();foreach(keys %cp){my$av=c($_);my$cv=d($av);foreach(@{$cp{$av ++15}}){ $cs[$_]=$cv;}}return@cs;}sub f {print join( "", @_ );print "\n";}
~Thomas~
bless( $you ) if $you->{sneezed};
bless( $you ) if $you->{sneezed};
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Making code less fun to read
by tobyink (Canon) on Jun 01, 2012 at 19:33 UTC | |
by Grimy (Pilgrim) on Jun 01, 2012 at 19:39 UTC | |
by thomas895 (Deacon) on Jun 01, 2012 at 21:51 UTC | |
by Anonymous Monk on Jun 25, 2015 at 11:25 UTC |
Back to
Obfuscated Code