Às vezes baixo uns filmes para ver no PC e nada pior e mais chato que o protetor de link. Legal, alguns são fáceis de burlar, só clicar no botão lem baixo e ok, ou copiar o link de download direto na barra de endereço ou copiar o endereço do botão ou ainda ler direto no código-fonte.

Mas agora inventaram de inverter o endereço, igual aqui: http://www.baixaebr.com/Down/?url=ZCOHVV66=d?/moc.daolpuagem.www//:ptth .

Dá pra ver que a URL está logo depois de "url=", mas como baixar direto se a URL está invertida? Basta copiar e colar tudo que está depois de "url=" num arquivo de texto chamado "ARQUIVO" (ou altere o  e rodar esse script aqui, que reverte a URL, mostrando que é "http://www.megaupload.com/?d=66VVHOCZ" (TA-DA!).

Quem quiser pode melhorar, colocando algo a mais para ler o endereço, reverter, etc. mas para meu uso de pouco volume basta.

Direto na linha de comando: echo URL ou cat ARQUIVO | perl -e 'while ($line = <STDIN>) { $ch = reverse $line; print $ch}'

Não preciso contar que este é mais um exercício em Perl, né? E que eu não sou programador... e deve ter uns 10 jeitos mais fáceis de fazer isso rsrs.

• Download linkrevert
• Enviar nova versão

Esconder código-fonte

perl -e 'open(IN, "<ARQUIVO"); while ($line = <IN>) { $ch = reverse $line; print $ch}'

Google Tradutor

API do Bing para traduzir textos

Postando mensagem no Facebook com Perl

Obtendo o IP público (Internet) usando o Perl

Gmail::SendMail - Enviando emails usando gmail