[Rio-pm] ajude o "firefox download day" com Perl!

Bruno Buss bruno.buss em gmail.com
Terça Junho 17 18:36:10 PDT 2008 

Se me perguntarem eu digo que como sou um usuário leigo, salvei
3493240932785023 vezes sem querer em /dev/null =/

2008/6/17 breno <breno em rio.pm.org>:

> Ué, achei que o recorde era "software mais baixado em 24h", e não
> "software mais baixado *por humanos* em 24h"... só estava tentando
> ajudar :-/
>
> Além disso, eu uso o firefox! Não estou forjando o destinatário ou
> baixando para não usar. Só estou baixando mais vezes do que o
> necessário :-)
>
> []s
>
> -b
>
> 2008/6/17 Blabos de Blebe <blabos em gmail.com>:
> > Depois vão falar que ninguém usa o firefox, e que são bots que baixam...
> >
> > 2008/6/17 Solli Honorio <shonorio em gmail.com>:
> >> então deve ser a telefônica boicotando o FireFox Day :( !!!
> >>
> >> Solli M. Honório
> >>
> >> 2008/6/17 breno <breno em rio.pm.org>:
> >>>
> >>> Ué... por enquanto eu estou assim:
> >>>
> >>> $ perl get_firefox3.pl
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> erro :(
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> sucesso!
> >>> ...
> >>>
> >>>
> >>> []s
> >>>
> >>> -b
> >>>
> >>> 2008/6/17 Solli Honorio <shonorio em gmail.com>:
> >>> > Isto se a infra deixar por que não está facil baixar nada da firefox
> >>> > hoje :)
> >>> > !!!
> >>> >
> >>> > Solli M. Honório
> >>> >
> >>> > 2008/6/17 breno <breno em rio.pm.org>:
> >>> >>
> >>> >> Pessoal,
> >>> >>
> >>> >> como vcs talvez saibam, hoje saiu o Firefox 3!!! E a Mozilla
> >>> >> Foundation está fazendo um estardalhaço com o evento, querendo
> entrar
> >>> >> para o Guinness ("Livro dos Recordes") como o maior número de
> >>> >> downloads de um único software em 24h.
> >>> >>
> >>> >> Para quem quiser dar "uma maozinha" a eles, segue abaixo um pequeno
> >>> >> programa que fica baixando o arquivo ad-eternun (leia-se até que vcs
> >>> >> deliberadamente interrompam o programa com ctrl-c ou coisa que o
> >>> >> valha):
> >>> >>
> >>> >> -------------------------8<-------------------------
> >>> >> #!/usr/bin/perl
> >>> >> use LWP::Simple;
> >>> >>
> >>> >> while (1) {
> >>> >>    if (defined
> >>> >>
> >>> >>
> >>> >> (get('
> http://download.mozilla.org/?product=firefox-3.0&os=win&lang=pt-BR')<http://download.mozilla.org/?product=firefox-3.0&os=win&lang=pt-BR%27%29>
> ))
> >>> >> {
> >>> >>        print "sucesso!\n";
> >>> >>    }
> >>> >>    else {
> >>> >>        print "erro :(\n";
> >>> >>    }
> >>> >> }
> >>> >> -------------------------8<-------------------------
> >>> >>
> >>> >> Abaixo, versão para golfe, sem mensagens de sucesso ou falha (usando
> >>> >> LWP::Simples. Alguém se habilita a fazer sem módulos?):
> >>> >>
> >>> >> -------------------------8<-------------------------
> >>> >> use LWP::Simple;
> >>> >> while (1)
> >>> >>
> >>> >> {get('
> http://download.mozilla.org/?product=firefox-3.0&os=win&lang=pt-BR'<http://download.mozilla.org/?product=firefox-3.0&os=win&lang=pt-BR%27>
> )}
> >>> >> -------------------------8<-------------------------
> >>> >>
> >>> >> Note que ambas as versões acima do programa ficam baixando o
> programa
> >>> >> eternamente mas descartam todo o conteúdo baixado. Se vcs quiserem
> de
> >>> >> fato ter uma cópia do firefox 3 em disco, é preciso escrever o
> >>> >> conteúdo baixado no sistema. Segue modificação em cima do código
> acima
> >>> >> que continua baixando ad-eternum, mas se vc interromper o programa
> >>> >> haverá um arquivo "ff3.exe" no diretório em que o programa foi
> >>> >> executado, pronto para instalação!
> >>> >>
> >>> >> -------------------------8<-------------------------
> >>> >> #!/usr/bin/perl
> >>> >> use LWP::Simple;
> >>> >>
> >>> >> while (1) {
> >>> >>    if (defined (my $arq =
> >>> >>
> >>> >>
> >>> >> get('
> http://download.mozilla.org/?product=firefox-3.0&os=win&lang=pt-BR')<http://download.mozilla.org/?product=firefox-3.0&os=win&lang=pt-BR%27%29>
> ))
> >>> >> {
> >>> >>        print "sucesso!\n";
> >>> >>        open my $fh, '>', 'ff3.exe' or die "erro abrindo arquivo:
> $!\n";
> >>> >>        binmode ($fh);
> >>> >>        print $fh $arq;
> >>> >>        close $fh;
> >>> >>    }
> >>> >>    else {
> >>> >>        print "erro :(\n";
> >>> >>    }
> >>> >> }
> >>> >> -------------------------8<-------------------------
> >>> >>
> >>> >> Bom, pessoal, é isso. O programa pode ser separado em
> >>> >> threads/processos ou simplesmente executado várias vezes caso vcs
> >>> >> estejam com vontade de ajudar mesmo (ou não fazer mais nada na
> >>> >> Internet, pq sua banda será bastante consumida nesse caso).
> >>> >>
> >>> >> De qq forma, e mesmo que vc não esteja absolutamente interessado em
> >>> >> ajudá-los com o "download day" (que vai até amanhã à tarde para
> nós),
> >>> >> o Firefox continua sendo um excelente navegador Web e a versão 3
> >>> >> possui uma série de melhorias e avanços interessantes, valendo a
> >>> >> olhada - mesmo que vcs decidam baixar só outro dia :-)
> >>> >>
> >>> >> []s
> >>> >>
> >>> >> -b
> >>> >> _______________________________________________
> >>> >> Rio-pm mailing list
> >>> >> Rio-pm em pm.org
> >>> >> http://mail.pm.org/mailman/listinfo/rio-pm
> >>> >
> >>> >
> >>> >
> >>> > --
> >>> > "o animal satisfeito dorme". - Guimarães Rosa
> >>> > _______________________________________________
> >>> > Rio-pm mailing list
> >>> > Rio-pm em pm.org
> >>> > http://mail.pm.org/mailman/listinfo/rio-pm
> >>> >
> >>> _______________________________________________
> >>> Rio-pm mailing list
> >>> Rio-pm em pm.org
> >>> http://mail.pm.org/mailman/listinfo/rio-pm
> >>
> >>
> >>
> >> --
> >> "o animal satisfeito dorme". - Guimarães Rosa
> >> _______________________________________________
> >> Rio-pm mailing list
> >> Rio-pm em pm.org
> >> http://mail.pm.org/mailman/listinfo/rio-pm
> >>
> > _______________________________________________
> > Rio-pm mailing list
> > Rio-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/rio-pm
> >
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>



-- 
Bruno C. Buss

Aluno do DCC - UFRJ - www.dcc.ufrj.br
Diretor de Pesquisa e Desenvolvimento do GRIS - UFRJ - www.gris.dcc.ufrj.br

"You know, you really are supposed to understand the code you are
modifying..." — Al Viro
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/rio-pm/attachments/20080617/462e1928/attachment-0001.html

Mais detalhes sobre a lista de discussão Rio-pm