File Coverage

blib/lib/Acme/MetaSyntactic/us_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::us_presidents;
2 1     1   386129 use strict;
  1         10  
  1         43  
3 1     1   13 use Acme::MetaSyntactic::List;
  1         3  
  1         269  
4             our @ISA = qw( Acme::MetaSyntactic::List );
5             our $VERSION = '1.001';
6             __PACKAGE__->init();
7              
8             our %Remote = (
9             source => 'https://www.whitehouse.gov/1600/Presidents',
10             extract => sub {
11             return
12             map { s/(?:,| the [1-9]).*//; y'- .'_'; s/_+/_/g; s/_+\z//; s/\b(.)/uc $1/eg; $_ }
13             #grep { !/^(?:BEGIN|END)$/ }
14             #$_[0] =~ /"Portrait of ([^"]+)"/g;
15             $_[0] =~ m{

\s*([^<]+?)\s*

}g;
16             }
17             );
18              
19             1;
20              
21             =head1 NAME
22              
23             Acme::MetaSyntactic::us_presidents - The presidents of the USA theme
24              
25             =head1 DESCRIPTION
26              
27             Presidents of the USA.
28              
29             This list is based on the official White House list, available at:
30             L.
31              
32             =head1 CONTRIBUTOR
33              
34             Abigail
35              
36             =head1 CHANGES
37              
38             =over 4
39              
40             =item *
41              
42             2021-04-30 - v1.002
43              
44             Updated with the new US president since 2017
45             in Acme-MetaSyntactic-Themes version 1.055.
46              
47             =item *
48              
49             2017-06-12 - v1.001
50              
51             Updated with the new US president since 2012
52             in Acme-MetaSyntactic-Themes version 1.050.
53              
54             =item *
55              
56             2012-05-07 - v1.000
57              
58             Updated with the new US president since 2008, and
59             received its own version number in Acme-MetaSyntactic-Themes version 1.000.
60              
61             =item *
62              
63             2006-01-16
64              
65             Updated (correction of a typo) by Abigail again
66             in Acme-MetaSyntactic version 0.57.
67              
68             =item *
69              
70             Introduced in Acme-MetaSyntactic version 0.52, published on December 12, 2005.
71              
72             =item *
73              
74             2005-10-20
75              
76             Submitted by Abigail.
77              
78             =back
79              
80             =head1 SEE ALSO
81              
82             L, L.
83              
84             =cut
85              
86             __DATA__