Updates and improves code for Xorg/AX directory merge.
[platal.git] / modules / fusionax / formation.pl
index 0c61e53..c6eb6a7 100755 (executable)
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 use utf8;
-open(FILE, "<:encoding(UTF-8)", "Formations.txt") || die ("Erreur d'ouverture");
-open(OUT, ">:encoding(UTF-8)", "Formations_out.txt") || die ("Erreur d'ouverture");
+open(FILE, "<:encoding(UTF-8)", "../../spool/fusionax/Formations.txt") || die ("Erreur d'ouverture");
+open(OUT, ">:encoding(UTF-8)", "../../spool/fusionax/Formations_out.txt") || die ("Erreur d'ouverture");
 
 while (<FILE>)
 {
@@ -265,7 +265,7 @@ while (<FILE>)
   s/\tès /\t/g;
   s/\tof /\t/g;
   s/( )+(\t)/\t/g;
-  
+
 
   # On remet dans l'ordre lorsque le diplôme se situe après l'université
   s/Manag\.Vanderblit/Vanderbilt University\tManagement/;