« glua Tech Sessions
O meu blog »

Lullaby.pl

Hoje acabei de ler o Lullaby do Chuck Palahniuk e gostei.

Pode dizer-se que gostei ao ponto de ir a página do Palahniuk na net. E nela vi isto, uma adaptação do livro por Gabor Kiss. Um comic.

Pode dizer-se que gostei ao ponto de querer ler este mesmo comic também. Tem 96 páginas, comecei a lê-lo no sitio web, mas senti do Eye of GNOME. Com ele poderia carregar em F11, ficar com os scans em full-screen e carregar na seta direcional para a direita para prosseguir a leitura. Tão prático. Tão bom.

Então, saiu-me isto:

PLAIN TEXT
PERL:
  1. #!/usr/bin/perl
  2.  
  3. use strict;
  4. use warnings;
  5. use LWP::Simple;
  6.  
  7. # http://chuckpalahniuk.net/sites/all/images/comics/lullaby/N_page_001.jpg
  8. # http://chuckpalahniuk.net/sites/all/images/comics/lullaby/N_page_096.jpg
  9.  
  10. my $link = "http://chuckpalahniuk.net/sites/all/images/comics/lullaby/N_page_";
  11. my $i, my $page, my $status;
  12.  
  13. for($i=1; $i<97; $i++) {
  14.     $page=sprintf("%03s", $i);
  15.     $status=getstore($link.$page.".jpg", "lullaby_comic_".$page.".jpg");
  16.     if(is_success($status)) {
  17.         print "lullaby_comic_".$page." downloaded: ".$status."\n";
  18.     } else {
  19.         die "lullaby_comic_".$page." could not be downloaded: ".$status."\n";
  20.     }
  21. }

Quem quiser, pode usar isto para fazer download completo do comic.

Tags: , , , , , , , ,

This entry was posted by ponto on Saturday, November 8th, 2008 at 11:47 pm and is filed under Geekices, Geral, Internet, Livros, Sites. You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response, or trackback from your own site.

Leave a Reply