summaryrefslogtreecommitdiff
path: root/b
diff options
context:
space:
mode:
Diffstat (limited to 'b')
-rwxr-xr-xb/membres/dump.pl63
-rw-r--r--b/membres/membres.pl175
2 files changed, 238 insertions, 0 deletions
diff --git a/b/membres/dump.pl b/b/membres/dump.pl
new file mode 100755
index 0000000..d6227b9
--- /dev/null
+++ b/b/membres/dump.pl
@@ -0,0 +1,63 @@
+#!/usr/bin/perl -w
+#
+# Liste des membres.
+#
+use strict;
+
+our %membres;
+do 'membres.pl' or die;
+
+
+if (scalar @ARGV != 1 && scalar @ARGV != 2)
+{
+ print <<EOF;
+$0 - affiche une liste des membres.
+
+Utilisation : $0 'code perl' [année]
+
+Variables disponibles :
+ login, nom, nick, promo, adresse, tel, telparents, devise
+Variables anuelles :
+ role, taches, bureau, cotiz, dispo
+
+Exemple :
+
+Affiche une liste pour l'accés au local pour l'importer directement dans un
+format Excel demandé par l'admin :
+ $0 'print "\$nom;\$promo\\n" if \$promo >= 2006' 2006
+
+Affiche la liste des développeurs :
+ $0 'print "\$role\\t\$nom\\n" if \$role' 2006
+
+Affiche toutes les personnes qui on un jour participé au robot :
+ $0 'print "\$nom\\n"'
+
+À vous d'imaginer d'autre commandes !
+EOF
+ exit 1;
+}
+
+my ($p, $year) = @ARGV;
+
+for (keys %membres)
+{
+ # 'Décompresse' le hash.
+ my $login = $_;
+ my $m = $membres{$_};
+ next unless !defined $year || exists $$m{$year};
+ my ($nom, $nick, $promo, $adresse, $tel, $telparents, $devise) =
+ ($$m{'nom'}, $$m{'nick'}, $$m{'promo'}, $$m{'adresse'}, $$m{'tel'},
+ $$m{'telparents'}, $$m{'devise'});
+ if (defined $year)
+ {
+ my $y = $$m{$year};
+ my ($role, $taches, $bureau, $cotiz, $dispo) =
+ ($$y{'role'}, $$y{'taches'}, $$y{'bureau'}, $$y{'cotiz'},
+ $$y{'dispo'});
+ eval $p;
+ }
+ else
+ {
+ eval $p;
+ }
+}
diff --git a/b/membres/membres.pl b/b/membres/membres.pl
new file mode 100644
index 0000000..b221d66
--- /dev/null
+++ b/b/membres/membres.pl
@@ -0,0 +1,175 @@
+%membres = (
+ 'debeaure' => {
+ nom => 'Guillaume de Beaurepaire',
+ nick => 'gui',
+ promo => 2007,
+ adresse => '19 rue Ernest Renan, 75015 Paris',
+ tel => [ '06 78 12 77 83' ],
+ devise => 'Nessuma cosa si può amare nè odiare, se prima non si ha'
+ . 'cognition di quelle',
+ 2006 => {
+ role => 'casdev',
+ taches => 'meca, plans, table, bidouilles, cartes elec, avr, balises',
+ cotiz => 0,
+ },
+ },
+ 'demonchy' => {
+ nom => 'Clément Demonchy',
+ nick => 'kermit',
+ promo => 2006,
+ adresse => 'appt 12, 140 boul Maxime Gorki, 94800 Villejuif',
+ tel => [ '06 83 14 22 42', '08 71 71 06 36' ],
+ telparents => [ ],
+ devise => 'Verrais ça plus tard',
+ 2006 => {
+ role => 'casdev',
+ taches => 'info, avr, meca',
+ bureau => '',
+ cotiz => 0,
+ dispo => '',
+ },
+ },
+ 'dalmais' => {
+ nom => 'Romain Dalmais',
+ nick => 'snayle',
+ promo => 2005,
+ adresse => '25 rue du hameau, Paris',
+ tel => [ '06 63 25 27 33' ],
+ telparents => [ '01 48 28 11 79' ],
+ devise => 'Touriste un jour, Touriste toujours',
+ 2006 => {
+ role => 'casdev',
+ taches => 'meca, elec, avr',
+ bureau => 'Touriste en chef',
+ cotiz => 0,
+ dispo => '',
+ },
+ },
+ 'gagnage' => {
+ nom => 'Brice Gagnage',
+ nick => 'mia0u',
+ promo => 2007,
+ adresse => 'En cours de demmenagement',
+ tel => [ '06 16 70 04 73' ],
+ telparents => [ ],
+ devise => "Si les chats n'aiment pas l'eau, c'est parceque dans l'eau minet râle",
+ 2006 => {
+ role => 'coredev',
+ taches => 'elec, meca, chats',
+ bureau => 'webmaster',
+ cotiz => 0,
+ dispo => '',
+ },
+ },
+ 'gaillaro' => {
+ nom => 'Olivier Gaillard',
+ nick => 'ate',
+ promo => 2006,
+ adresse => '17 rue daumesnil, 94300 Vincennes',
+ tel => [ '06 76 81 72 40' ],
+ telparents => [ '01 43 98 15 20' ],
+ devise => "Il faut être aussi fraîs qu'un concombre dans la vie",
+ 2006 => {
+ role => '',
+ taches => 'vision, coca cola',
+ bureau => '',
+ cotiz => 0,
+ dispo => 'juin 2006',
+ },
+ },
+ 'galmes' => {
+ nom => 'Pierre-Andre Galmes',
+ nick => 'pedro',
+ promo => 2005,
+ adresse => 'Sans Domicile Fixe',
+ tel => [ '06 66 02 37 62' ],
+ telparents => [ '03 81 98 46 55' ],
+ devise => 'Plexi, pleximaaaaan, I want to be a pleximaaaaaan !',
+ },
+ 'geneves' => {
+ nom => 'Vincent Geneves',
+ nick => 'Vinzoo',
+ promo => 2007,
+ adresse => 'appt A307, 179 bd Maxime Gorki',
+ tel => [ '06 33 44 14 43', '01 47 26 28 46' ],
+ telparents => [ '02 37 28 30 34' ],
+ 2006 => {
+ role => 'casdev',
+ taches => 'elec',
+ bureau => 'Secrétaire',
+ cotiz => 0,
+ dispo => '',
+ },
+ },
+ 'haller' => {
+ nom => 'Nicolas Haller',
+ nick => 'gaasmann',
+ promo => 2008,
+ adresse => 'arche',
+ tel => [ '06 11 46 20 80', '08 73 63 20 80' ],
+ telparents => [ '02 38 51 85 79' ],
+ devise => 'Moi je dis stop aux cheveux qui cassent les grands mères ' .
+ 'moldaves qui font la manche dans le métro station la Défense ou ' .
+ 'Monparnasse sur le tapis roulant qui va à 18 Kilomètres/Heure',
+ 2006 => {
+ role => 'coredev',
+ taches => 'plans, avr, asserv, info',
+ bureau => 'Tiroir',
+ cotiz => 0,
+ dispo => '',
+ },
+ },
+ 'lafaye' => {
+ nom => 'Philippe Lafaye',
+ nick => 'rage2000',
+ promo => 2006,
+ adresse => '35 rue de rottembourg, 75012 Paris',
+ tel => [ '06 18 55 35 75', '08 71 79 14 83' ],
+ telparents => [ ],
+ 2006 => {
+ role => 'casdev',
+ taches => 'linux',
+ bureau => 'Meuble',
+ cotiz => 0,
+ dispo => '',
+ },
+ },
+ 'lambert' => {
+ nom => 'Thomas Lambert',
+ nick => 'marcel',
+ promo => 2007,
+ adresse => '104 rue de Verdun, 94800 Villejuif',
+ tel => [ '06 85 55 87 84' ],
+ telparents => [ '' ],
+ devise => "Rien n'est impossible à l'Homme. Ce que l'homme ne peux pas faire, il le laisse.",
+ 2006 => {
+ role => 'coredev',
+ taches => 'elec, avr',
+ bureau => 'Vice president, trésorier',
+ cotiz => 0,
+ dispo => 'pas cette été',
+ },
+ },
+ 'ritter' => {
+ nom => 'Maxime Ritter',
+ nick => 'Roberta',
+ promo => 2003.5,
+ tel => [ '06 68 617 817' ],
+ devise => "Ça pue, c'est pas libre !",
+ },
+ 'schodet' => {
+ nom => 'Nicolas Schodet',
+ nick => 'ni',
+ promo => 2005,
+ adresse => 'appt C103, 179 bd Maxime Gorki, 94800 Villejuif',
+ tel => [ '06 77 66 90 57' ],
+ telparents => [ '03 28 26 00 37' ],
+ 2006 => {
+ role => 'casdev',
+ taches => 'avr, modules, admin',
+ bureau => 'Responsable qualité',
+ cotiz => 0,
+ dispo => '',
+ },
+ },
+)