segunda-feira, 22 de março de 2010

Um programa muito giro

#!/usr/bin/env ruby19
$VERBOSE=''=~/./
require 'open-uri'
alias

_               open
K="iuuq;00hpphmf/dp\
n0tfbsdi@jf>VUG.9'r\
>";R="gsso9..fnnfkd\
-bnl.rd`qbg>hd<TSE,\
7%p<";I=0;P='';loop{
B=K[I];C=R[I];C=C;D=
B.bytes.to_a[I-I-I+\
I-I+I+I-I-I+I+I-I-I-
I+I+I];E=C.getbyte 0
                    P+=((D+E)/2).send(\
                    'rhaac'.unpack('xx\
                    xxaXXXXaXXa').join.
                    intern);I<35?I+=1:\
                    break};$*[0]?(B=$*[
                    0].gsub(/ /,?+);P<<
                    B;Z=_(P).read;puts(
                    Z.scan(/<cite>.*?<\/
                    cite>/x).map{|l|l.
                    gsub(/<[^<>]*>| - /,
                    '')})):IO.new(0)<<
                    "\n\LIAF".reverse

Se alguém conseguir perceber o que isto faz, dê-me com uns paralelos na tola.

Sem comentários: