$french = $ENV{LANGUAGE} =~ /fr/;

$name = 'Pascal Rigaux';
$title = $french ? "$name - CV" : "$name - Resume";
$email = 'pascal at rigaux dot org';
$LaTeX or $name = '<a href="mailto:' . $email . '">' . $name . '</a>';
$lambda = $LaTeX ? '$\lambda$' : 'lambda';
$irisa = html_links "Irisa", "www.irisa.fr/";
$compose = "Compose"; #, "compose.labri.fr/compose.html";
$imadoc = html_links "Imadoc", "www.irisa.fr/imadoc/";
$insa = html_links "Insa", "www.insa-rennes.fr/";
$polytechnique = html_links "Polytechnique", "www.polytechnique.fr/";
$univ_rennes1 = html_links "université de Rennes I", "www.univ-rennes1.fr/";
$france_telecom = html_links "France Télécom", "www.france-telecom.com/";
$mandriva = html_links "Mandriva", "www.mandriva.com/";

$drakx = html_links "DrakX", "qa.mandriva.com/twiki/bin/view/Main/DrakX";
$merd = html_links "merd", "merd.net/";
$perl = html_links "Perl", "www.perl.org/";
$ruby = html_links "Ruby", "www.ruby-lang.org/";
$haskell = html_links "Haskell", "www.haskell.org/";
$python = html_links "Python", "www.python.org/";
$mercury = html_links "Mercury", "www.cs.mu.oz.au/research/mercury/";
$tcltk = html_links "Tcl/Tk", "www.tcl.tk/";
$ocaml = html_links "OCaml", "www.ocaml.org/";
$java = html_links "Java", "www.javasoft.com/";
$linux = html_links "Linux", "www.linux.org/";
$lprolog = "$lambda-prolog";
$vrml = html_links "VRML", "www.web3d.org";
$html = html_links "HTML", "www.w3.org/MarkUp/";
$xml = html_links "XML", "www.w3.org/XML/";
$emacs = html_links "Emacs", "www.gnu.org/software/emacs/";
$quicktimevr = html_links "Quick Time VR", "www.apple.com/quicktime/technologies/qtvr/";
$prolog3 = html_links "PrologIII", "prologianet.univ-mrs.fr/";
$pliant = html_links "Pliant", "en.wikipedia.org/wiki/Pliant";
$scheme = html_links "Scheme", "www.scheme.org/";
$postscript = html_links "PostScript", "en.wikipedia.org/wiki/PostScript";

#$background_image = 'background-pixel.jpg';

@personal = (
	      $name,
	      $french ? "Né le 02/10/1975" : "Date of Birth: October 02, 1975",
	      $french ? "Français" : "Nationality: French",
	     );

$address = $french ? "Adresse : " : "Address: ";
@address = (
	    "62 rue Doudeauville",
	    "75018 Paris",
	    );

$email_title = $french ? 'Mél : ' : 'Mail: ';
$phone = $french ? "Téléphone : " : "Phone: ";
$phone_number = $french ? "01 42 05 61 76" : "+33 (0) 1 42 05 61 76";

$pdf = $french ? "cv-pixel-fr.pdf" : "cv-pixel.pdf";
@after_address = (
    $french ? '<a href="cv-pixel-fr.pdf">Pour impression</a>' : '<a href="cv-pixel.pdf">Printable version</a>',
    $french ? '<a href="cv-pixel.html">English version</a>' : '<a href="cv-pixel-fr.html">French version</a>',
);

$colon = $french ? ' :' : ':';

@body = 
($french ? "Expériences professionnelles" : "Work Experience" =>
 [ 
  "1999/2007$colon" => "working at $mandriva (was Mandrakesoft) (mainly on $drakx, drakxtools, urpmi)",
  "1998/99$colon" => 
    $french ? "scientifique du contigent à l'école $polytechnique (modélisation 3D de l'école pour la réalisation d'un $quicktimevr)" :
              qq(Military duty as "Scientifique du Contingent" at $polytechnique),
  "1998$colon" => [ 
      $french ? "stage de DEA dans l'équipe $compose de l'$irisa" :
	"6 months training in $compose team at $irisa",
      $french ? "(autour de l'évaluation partielle, la compilation optimisante et l'architecture des processeurs)" : (),
	      ],
  $french ? ("été 1997$colon" => "stagiaire dans l'équipe $imadoc de l'$irisa (développement en C++ et en $lprolog)") : (),
#  "été 1996$colon" => "développeur en langage C à $france_telecom",
 ],
 $french ? "Conférences et publications" : 'Presentations and Publications' =>
 [
  "2006$colon" => html_links("Syntax Across Languages", 'merd.net/pixel/language-study/syntax-across-languages/') . ' cited in the ' . html_links('American Scientist', 'www.americanscientist.org/template/AssetDetail/assetid/51982/page/2'),

  $french ? "avril 1998 :" : "April 1998:" => "Architecture et performance des interpréteurs" .
         ($LaTeX ? '' : ' (<a href="resume.ps">abstract</a>, <a href="architecture-et-performance-des-interpreteurs.ps">slides</a>)') . ", based on " . html_links("The Structure and Performance of Interpreters", "citeseer.ist.psu.edu/romer96structure.html"),
  $french ? "février 2001 :" : "February 2001:" => html_links("presentation about programming languages", "rigaux.org/language-study/language-study-slides/") .
                      " (those slides were presented at " . html_links("linux expo Paris '01", "www.linuxworldexpo.com/") . ")",
 ],


 $french ? "Compétences" : 'Skills' => 
 [
     "Expert$colon" => comma_list ( 'Linux distributions', 'rpm/urpmi', $perl, "C", $html, $xml, 'shell', $emacs),
     $french ? 'Bonne connaissance :' : "Good knowledge:" => 
       comma_list($ocaml, "C++", $haskell, $ruby, $java, $merd, 
		  $french ? "assembleur" : 'assembly',
		  $scheme, $python, "Awk", "Pascal", 'Prolog'),
     
     $french ? 'Notions de base :' : 'Basic knowledge:' =>
       comma_list($tcltk, 'SQL', $postscript, 'C#', "Smalltalk", $lprolog, $mercury, $pliant),
  ],

 $french ? "Études" : "Education" =>
 [
  "06/1998$colon" => $french ? "obtention du diplôme d'ingénieur informatique $insa" : "$insa Computer Science Engineer degree",
  "1997/1998$colon" => $french ? "DEA d'informatique à l'$univ_rennes1" : "Computer Science DEA Master at $univ_rennes1",
  "1995/1998$colon" => $french ? "formation d'ingénieur informatique $insa" : "$insa Computer Science Engineer study", 
 ],

 $french ? "Langues pratiquées" : 'Languages' => 
 [
  $french ? "anglais :" : 'english:' => $french ? "lu, écrit et parlé couramment" : "fluent",
  $french ? (): ("french: " => 'native language'),
 ],
 
 $french ? "Divers" : 'Hobbies' =>
 [
  '' => join(', ', html_links($french ? "vélo" : 'bike', 'www.mdb-idf.org/'), 
	     'badminton',
	     $french ? 'natation' : 'swimming',
	     html_links($french ? 'chorale' : 'choir', 'ajtduvocal.com/'),
	 ),
 ]
);