Complicado é achar quem tenha a pretensão de ENTENDER esse bicho...
Perl quando bem usado é a única linguagem que fica mais legível DEPOIS
de compilado..
On Tue, 13 Mar 2001 15:53:11 -0300
Renato Lira <[EMAIL PROTECTED]> wrote:
> Aos que ainda nao acreditam no potencial desta fascinante
> linguagem, abaixo o codigo fonte para quebra de seguranca contra
> copias de DVD:
>
> #!/usr/bin/perl
> # 472-byte qrpff, Keith Winstein and Marc Horowitz <[EMAIL PROTECTED]>
> # MPEG 2 PS VOB file -> descrambled output on stdout.
> # usage: perl -I <k1>:<k2>:<k3>:<k4>:<k5> qrpff
> # where k1..k5 are the title key bytes in least to most-significant order
>
> s''$/=\2048;while(<>){G=29;R=142;if((@a=unqT="C*",_)[20]&48){D=89;_=unqb24,qT,@
> b=map{ord qB8,unqb8,qT,_^$a[--D]}@INC;s/...$/1$&/;Q=unqV,qb25,_;H=73;O=$b[4]<<9
> |256|$b[3];Q=Q>>8^(P=(E=255)&(Q>>12^Q>>4^Q/8^Q))<<17,O=O>>8^(E&(F=(S=O>>14&7^O)
> ^S*8^S<<6))<<9,_=(map{U=_%16orE^=R^=110&(S=(unqT,"\xb\ntd\xbz\x14d")[_/16%8]);E
> ^=(72,@z=(64,72,G^=12*(U-2?0:S&17)),H^=_%64?12:0,@z)[_%8]}(16..271))[_]^((D>>=8
> )+=P+(~F&E))for@a[128..$#a]}print+qT,@a}';s/[D-HO-U_]/\$$&/g;s/q/pack+/g;eval
>
>
> ================================================================
> Código de segurança do DVD foi quebrado novamente
> Sexta-feira, 09 de março de 2001 - 09h55
> SÃO PAULO - Está nos sites de hackers mundo afora: circula na web
> uma nova versão do DeCSS, o código proibido que quebra a proteção
> contra cópias dos DVDs.
>
> O programa foi feito por dois americanos, estudantes do MIT,
> Keith Winstein e Marc Horowitz, e tem apenas sete linhas de
> código em linguagem Perl.
>
> Segundo o site de hackers 2600 News, o programa tem 526 bytes e
> se chama qrpff.pl, e tem ainda uma versão mais rápida e
> ligeiramente maior (531 bytes), qrpff-fast.pl.
>
> O 2600 ainda comenta que o simples fato de o programa exigir que
> o usuário entre com uma chave de 5 bytes para funcionar - ou
> seja, ele não roda livremente - já é o suficiente para que ele
> não seja considerado uma violação da lei de direitos autorais.
>
> O novo programa foi publicado no site Gallery of CSS
> Descramblers, que fica dentro do portal da Escola da Ciência da
> Computação Carnegie Mellon, no endereço
> http://www.cs.cmu.edu/~dst/DeCSS/Gallery/.
>
> Renata Mesquita, do Plantão INFO
> ================================================================
>
> []'s
> ....................................................
> .. Renato Lira
> .. Smile Co. Publicidade Ltda.
> .. http://www.mrweb.com.br - Seu amigo na Internet !
> ....................................................
>
>
>
> ------------------------------------------------------------------------------
> Lista GM9 Perl - http://www.gm9.com.br/perl
> Informações gerais, cadastramento e descadastramento
>
Allgemeinen Anschulterlaubnis
[]'s
Carlos Cardoso - [EMAIL PROTECTED]
===========================================================
"A Telerj é uma droga, uma vergonha nacional" - Sergio Motta
TELERJ É TELEMAR !!!
===========================================================
Tech Writer, BOFH & Trekker - Linux Reg user # 92301
------------------------------------------------------------------------------
Lista GM9 Perl - http://www.gm9.com.br/perl
Informações gerais, cadastramento e descadastramento
