From 7e7af8f294d6b8c49c341a560f6c4c34a583bd08 Mon Sep 17 00:00:00 2001 From: schodet Date: Sat, 8 Oct 2005 15:05:47 +0000 Subject: Ajout de la liste des membres. --- b/membres/dump.pl | 63 +++++++++++++++++++ b/membres/membres.pl | 175 +++++++++++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 238 insertions(+) create mode 100755 b/membres/dump.pl create mode 100644 b/membres/membres.pl (limited to 'b/membres') 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 <= 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 => '', + }, + }, +) -- cgit v1.2.3