File Coverage

blib/lib/Acme/MetaSyntactic/good_omens.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::good_omens;
2 1     1   83402 use strict;
  1         4  
  1         38  
3 1     1   13 use Acme::MetaSyntactic::List;
  1         2  
  1         285  
4             our $VERSION = '1.001';
5             our @ISA = qw( Acme::MetaSyntactic::List );
6              
7             =head1 NAME
8              
9             Acme::MetaSyntactic::good_omens - The Good Omens theme
10              
11             =head1 DESCRIPTION
12              
13             This list gives the names of the characters from
14             Neil Gaiman and Terry Pratchett's novel, I.
15              
16             Source: I
17              
18             A Narrative of Certain Events occurring in the
19             last eleven years of human history, in strict accordance as shall
20             be shewn with:
21              
22             I
23              
24             Compiled and edited, with Footnotes of an Educational Nature
25             and Precepts for the Wise,
26             by Neil Gaiman and Terry Pratchett.
27              
28             =cut
29              
30             {
31             my %seen;
32             __PACKAGE__->init(
33             { names => join ' ',
34             grep { !$seen{$_}++ }
35             map { s/_+/_/g; $_ }
36             map { Acme::MetaSyntactic::RemoteList::tr_nonword($_) }
37             map { Acme::MetaSyntactic::RemoteList::tr_accent($_) }
38             map { /^=item\s+(.*?)\s*$/ ? $1 : () }
39             split /\n/ => <<'=cut'} );
40              
41             =pod
42              
43             =head1 DRAMATIS PERSONAE
44              
45             =head2 SUPERNATURAL BEINGS
46              
47             =over 4
48              
49             =item God
50              
51             God
52              
53             =item Metatron
54              
55             The Voice of God
56              
57             =item Aziraphale
58              
59             An angel, and part-time rare book dealer
60              
61             =item Satan
62              
63             A Fallen Angel; the Adversary
64              
65             =item Beelzebub
66              
67             A Likewise Fallen Angel and Prince of Hell
68              
69             =item Hastur
70              
71             A Fallen Angel and Duke of Hell
72              
73             =item Ligur
74              
75             Likewise a Fallen Angel and Duke of Hell
76              
77             =item Crowley
78              
79             An Angel who did not so much Fall as Saunter Vaguely Downwards
80              
81             =back
82              
83             =head2 APOCALYPTIC HORSEPERSONS
84              
85             =over 4
86              
87             =item DEATH
88              
89             Death
90              
91             =item War
92              
93             War
94              
95             =item Famine
96              
97             Famine
98              
99             =item Pollution
100              
101             Pollution
102              
103             =back
104              
105             =head2 HUMANS
106              
107             =over 4
108              
109             =item Thou-Shalt-Not-Commit-Adultery Pulsifer
110              
111             A Witchfinder
112              
113             =item Agnes Nutter
114              
115             A Prophetess
116              
117             =item Newton Pulsifer
118              
119             Wages Clerk and Witchfinder Private
120              
121             =item Anathema Device
122              
123             Practical Occultist and Professional Descendant
124              
125             =item Shadwell
126              
127             Witchfinder Sergeant
128              
129             =item Madame Tracy
130              
131             Painted Jezebel [mornings only, Thursdays by arrangement] and Medium
132              
133             =item Sister Mary Loquacious
134              
135             A Satanic Nun of the Chattering Order of St. Beryl
136              
137             =item Mr Young
138              
139             A Father
140              
141             =item Mr Tyler
142              
143             A Chairman of a Residents' Association
144              
145             =item A Delivery Man
146              
147             =back
148              
149             =head2 THEM
150              
151             =over 4
152              
153             =item ADAM
154              
155             An Antichrist
156              
157             =item Pepper
158              
159             A Girl
160              
161             =item Wensleydale
162              
163             A Boy
164              
165             =item Brian
166              
167             A Boy
168              
169             =back
170              
171             Full Chorus of Tibetans, Aliens, Americans, Atlanteans and other rare and strange Creatures of the Last Days.
172              
173             =head2 AND
174              
175             =over 4
176              
177             =item Dog
178              
179             Satanical hellhound and cat-worrier
180              
181             =back
182              
183             =cut
184              
185             }
186              
187             666;
188              
189             __END__