I find that the best-tasting slices are the thin ones. The kind that just melt in your mouth. So with that in mind, here's a simple japh demonstrating
just one of perl's
many cool features...
slices!!
@j=@a=@p=@h= qw/ J u s t
A n o t h e r
P e r l
H a c k e r . /;
print (((((@j)[-22..21],q, ,)[-45..44])[0,23,47,70,44]),
((((((@a)[-7..10])[-18..17]),q, ,)[-8..-1]),
(((((@p)[-8..11])[0,-1])[-2..1])[1,2]))[-10..-2,-5..-4,-1],
((((((@h),q, ,)[11..22])[-8..2])[9,10,6,7,0..3])[-5..2]));
You know, Perl has so many great features. You might just say it's the best thing since... well... that other sliced stuff. ;)
-Bird
p.s. This is much more obfun than obfu, don't expect it to warp your brain much. I mean, gimme a break, I whipped it up while listening to my company's somewhat underwhelming investors conference call... *sigh*