File Coverage

blib/lib/Acme/MetaSyntactic/french_presidents.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package Acme::MetaSyntactic::french_presidents;
2 1     1   83521 use strict;
  1         129  
  1         43  
3 1     1   7 use Acme::MetaSyntactic::MultiList;
  1         2  
  1         296  
4             our @ISA = qw( Acme::MetaSyntactic::MultiList );
5             our $VERSION = '1.001';
6              
7             =encoding iso-8859-1
8              
9             =head1 NAME
10              
11             Acme::MetaSyntactic::french_presidents - The presidents of France theme
12              
13             =head1 DESCRIPTION
14              
15             Presidents of the various French republics.
16              
17             This list is based on the official Élysée list, available at:
18             L.
19             The typograpical errors in the names have been corrected, though.
20              
21             =head1 FRENCH PRESIDENTS
22              
23             =cut
24              
25             {
26             my %data;
27             my $republic;
28             for ( split /\n/ => <<'=cut' ) {
29              
30             =head2 The Fifth Republic
31              
32             =over 4
33              
34             =item Emmanuel Macron (2017-)
35              
36             =item François Hollande (2012-2017)
37              
38             =item Nicolas Sarkozy (2007-2012)
39              
40             =item Jacques Chirac (1995-2007)
41              
42             =item François Mitterrand (1981-1995)
43              
44             =item Valéry Giscard d'Estaing (1974-1981)
45              
46             =item Alain Poher (1974, interim from 02/04/1974 to 19/05/1974)
47              
48             =item Georges Pompidou (1969-1974)
49              
50             =item Alain Poher (1969, interim from 28/04/1969 to 20/06/1969)
51              
52             =item Charles de Gaulle (1959-1969)
53              
54             =back
55              
56             =head2 The Fourth Republic
57              
58             =over 4
59              
60             =item René Coty (1954-1959)
61              
62             =item Vincent Auriol (1947-1954)
63              
64             =back
65              
66             =head2 The Third Republic
67              
68             =over 4
69              
70             =item Albert Lebrun (1932-1940)
71              
72             =item Paul Doumer (1931-1932)
73              
74             =item Gaston Doumergue (1924-1931)
75              
76             =item Alexandre Millerand (1920-1924)
77              
78             =item Paul Deschanel (18 fév-20 sept 1920)
79              
80             =item Raymond Poincaré (1913-1920)
81              
82             =item Armand Fallières (1906-1913)
83              
84             =item Émile Loubet (1899-1906)
85              
86             =item Félix Faure (1895-1899)
87              
88             =item Jean Casimir-Perier (1894-1895)
89              
90             =item Marie François Sadi Carnot (1887-1894)
91              
92             =item Jules Grévy (1879-1887)
93              
94             =item Patrice de Mac Mahon (1873-1879)
95              
96             =item Adolphe Thiers (1871-1873)
97              
98             =back
99              
100             =head2 The Second Republic
101              
102             =over 4
103              
104             =item Louis-Napoléon Bonaparte (1848-1851)
105              
106             =back
107              
108             =cut
109              
110             /^=head2 The (.*)/ && do {
111             $republic = lc $1;
112             $republic =~ s/\W+/_/g;
113             };
114             /^=item (.*) \(/ && do {
115             my $item = Acme::MetaSyntactic::RemoteList::tr_accent("$1");
116             $item =~ s/\W+/_/g;
117             $data{$republic} .= "$item ";
118             };
119             }
120             __PACKAGE__->init( { names => \%data, default => ':all' } );
121             }
122              
123             =head1 CONTRIBUTOR
124              
125             Philippe Bruhat (BooK)
126              
127             =head1 CHANGES
128              
129             =over 4
130              
131             =item *
132              
133             2017-06-12 - v1.001
134              
135             Updated with the latest president, and the new URL for the authoritative list,
136             in Acme-MetaSyntactic-Themes version 1.050.
137              
138             =item *
139              
140             2012-05-07 - v1.000
141              
142             Introduced in Acme-MetaSyntactic-Themes version 1.000
143             (the day after the election of François Hollande).
144              
145             =back
146              
147             =head1 SEE ALSO
148              
149             L, L.
150              
151             =cut
152