#!/usr/local/bin/perl

# Ce script permet de lire les questions d'examen dans le fichier
# donné en premier argument, le nom des étudiants dans le deuxième
# fichier, puis de produire le fichier de "résultats".


open(STUDLIST,@ARGV[0]);
@studl = <STUDLIST>;
$longs = @studl;
open(FORMATTEDFILE,">@ARGV[1]");

#srand;


print(FORMATTEDFILE "\\documentclass[a4paper,11pt]{report}\n");
print(FORMATTEDFILE "\\usepackage[dvips]{graphics,epsfig}\n");
print(FORMATTEDFILE "\\usepackage{charter}\n");
print(FORMATTEDFILE "\\pagestyle{empty}\n");
print(FORMATTEDFILE "\\begin{document}\n");


#pour chacun des étudiants, sélectionner 3 questions et formatter la page

for ($count=0;$count <= $longs-1 ; $count +=1) {
@element = split(/\t/,$studl[$count]);

print(FORMATTEDFILE "\\noindent \\Large{\\textsc{TECFA - Prof Patrick Mendelsohn}}\\\\ \n");

print(FORMATTEDFILE "\\noindent \\Large{Apprentissage et Environnement Informatique}\n\n");
print(FORMATTEDFILE "\\hrule\n");
print(FORMATTEDFILE "\\vspace{0.5cm}\n");

print(FORMATTEDFILE "\\begin{center}\n");
print(FORMATTEDFILE "\\fbox{\\Large{\\textbf{Evaluation du Travail de Session}}}\n");
print(FORMATTEDFILE "\\end{center}\n");

print(FORMATTEDFILE "\\vspace{0.5cm}\n");

print(FORMATTEDFILE "\\large{\\textbf{Etudiant:}} \t\t @element[0]\n\n");
print(FORMATTEDFILE "\\noindent \\large{\\textbf{Nom du projet:}} \t @element[1]\n\n");
print(FORMATTEDFILE "\\noindent \\large{\\textbf{Collaborateurs:}} \t @element[2]\n\n");

print(FORMATTEDFILE "\\vspace{1cm}\n");

print(FORMATTEDFILE "\\noindent \\large{\\textsf{Présentation: \[ \]}}\n\n");
print(FORMATTEDFILE "\\vspace{1.2cm}\n");
print(FORMATTEDFILE "\\noindent \\large{\\textsf{Navigation: \[ \]}}\n\n");
print(FORMATTEDFILE "\\vspace{1.2cm}\n");
print(FORMATTEDFILE "\\noindent \\large{\\textsf{Contenu: \[ \]}}\n\n");
print(FORMATTEDFILE "\\vspace{1.2cm}\n");
print(FORMATTEDFILE "\\noindent \\large{\\textsf{Originalité: \[ \]}}\n\n");
print(FORMATTEDFILE "\\vspace{1.2cm}\n");
print(FORMATTEDFILE "\\noindent \\large{\\textsf{Autres commentaires: }}\n\n");

print(FORMATTEDFILE "\\vspace{1.5cm}\n");
print(FORMATTEDFILE "\\noindent \\large{\\textsf{Note finale:  }}\n\n");

print(FORMATTEDFILE "\n");
print(FORMATTEDFILE "\\newpage\n");
}


print(FORMATTEDFILE "\\end{document}\n");
print("Fin de l'opération\n");
