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   373663 use strict;
  1         8  
  1         51  
3 1     1   11 use Acme::MetaSyntactic::List;
  1         2  
  1         276  
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 { y'- .'_'; s/_+/_/g; s/\b(.)/uc $1/eg; $_ }
13             grep { !/^(?:BEGIN|END)$/ }
14             $_[0] =~ /"Portrait of ([^"]+)"/g;
15             }
16             );
17              
18             1;
19              
20             =head1 NAME
21              
22             Acme::MetaSyntactic::us_presidents - The presidents of the USA theme
23              
24             =head1 DESCRIPTION
25              
26             Presidents of the USA.
27              
28             This list is based on the official White House list, available at:
29             L.
30              
31             =head1 CONTRIBUTOR
32              
33             Abigail
34              
35             =head1 CHANGES
36              
37             =over 4
38              
39             =item *
40              
41             2017-06-12 - v1.001
42              
43             Updated with the new US president since 2012
44             in Acme-MetaSyntactic-Themes version 1.050.
45              
46             =item *
47              
48             2012-05-07 - v1.000
49              
50             Updated with the new US president since 2008, and
51             received its own version number in Acme-MetaSyntactic-Themes version 1.000.
52              
53             =item *
54              
55             2006-01-16
56              
57             Updated (correction of a typo) by Abigail again
58             in Acme-MetaSyntactic version 0.57.
59              
60             =item *
61              
62             Introduced in Acme-MetaSyntactic version 0.52, published on December 12, 2005.
63              
64             =item *
65              
66             2005-10-20
67              
68             Submitted by Abigail.
69              
70             =back
71              
72             =head1 SEE ALSO
73              
74             L, L.
75              
76             =cut
77              
78             __DATA__