Changeset 1691


Ignore:
Timestamp:
Oct 6, 2010, 11:01:45 AM (10 years ago)
Author:
teymour
Message:

nouveau parsing pour les présents

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpc/trunk/project/batch/commission/parse_presents.pl

    r1236 r1691  
    8686        if ($line =~ /<a name=["']([^"']+)["']/) {
    8787            $source = $url."#$1";
    88         }elsif($line =~ /<a[^>]+>([^<]+)</) {
     88        }elsif($line =~/class="menu"/ && $line =~ /<a[^>]+>([^<]+)</) {
    8989            $test = $1;
    9090            if (!$commission && $test =~ /Commission|mission/) {
Note: See TracChangeset for help on using the changeset viewer.