Changeset 1747


Ignore:
Timestamp:
Dec 6, 2010, 4:25:08 PM (10 years ago)
Author:
goya
Message:

Pb d'encodage depuis le nouveau look de l'AN (ne marche pas forcement localement :( )

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpc/trunk/project/batch/depute/download_deputes.pl

    r1346 r1747  
    1212        $a->get($uri);
    1313        mkdir html unless -e "html/" ;
    14         open FILE, ">:utf8", "html/$file";
     14        open FILE, ">", "html/$file";
    1515        print FILE $a->content;
    1616        close FILE;
     
    1919$a = WWW::Mechanize->new();
    2020
    21 $a->get("http://www.assemblee-nationale.fr/13/tribun/xml/liste_alpha.asp");
     21$a->get("http://www.assemblee-nationale.fr/qui/xml/liste_alpha.asp?legislature=13");
    2222$content = $a->content;
    2323$p = HTML::TokeParser->new(\$content);
Note: See TracChangeset for help on using the changeset viewer.