Changeset 2486 for cpc/trunk/project/batch

Timestamp:

Nov 12, 2011, 5:49:10 PM (9 years ago)

Author:

goya

Message:

fix annee manquante au jo

File:

• cpc/trunk/project/batch/jo/parse_jo.pl (modified) (2 diffs)

cpc/trunk/project/batch/jo/parse_jo.pl

@@ -3 +3 @@
 open FILE, shift;
 $source = shift;
-
+$anneepdf = $source;
+$anneepdf =~ s/^.*\/.*\///;
 
 $mois{'janvier'} = '01';
@@ -72 +73 @@
         s/ heures/:00/;
         s/ h /:/;
-        if (/([\d]+)[er]* ([\wéû]+) (\d+)/) {
-            $reunion = "$3-".$mois{$2}."-$1";
+        if (/([\d]+)[er]* ([\wéû]+) (à |\d+)/) {
+            $reunion = $mois{$2}."-$1";
+            $annee = $3;
+            $annee = $anneepdf if ($annee !=~ /\d/);
+            $reunion = "$annee-".$reunion;
         }
         if (/ à ([\d:]+)/) {