view release on metacpan or  search on metacpan

lib/Acme/MetaSyntactic/wales_towns.pm  view on Meta::CPAN

package Acme::MetaSyntactic::wales_towns;
use strict;
use Acme::MetaSyntactic::List;
our @ISA = qw( Acme::MetaSyntactic::List );
our $VERSION = '1.015';
__PACKAGE__->init();

our %Remote = (
    source  => 'http://en.wikipedia.org/wiki/List_of_towns_in_Wales',
    extract => sub {
        my $list = shift;
        $list =~ s{\A.* id="A">A<}{}s;
        $list =~ s{ id="See_also">See also<.*\z}{}ms;
        return map { s/_+/_/g; s/^_|_$//g; $_ }
            map { Acme::MetaSyntactic::RemoteList::tr_nonword($_) }
            $list =~ m{<a href="/wiki/[^"]*" title="[^"]*"[^>]*>([^<]+)</a>}g;
    },
);

1;

=head1 NAME

Acme::MetaSyntactic::wales_towns - Towns in Wales

=head1 DESCRIPTION

List of towns in Wales.

It would be nice to extend this to a list of all towns and villages
in Wales, if only to be able to include
Llanfairpwllgwyngyllgogerychwyrndrobwllllantysiliogogogoch.

Source: L<http://en.wikipedia.org/wiki/List_of_towns_in_Wales>.

=head1 CONTRIBUTORS

Abigail, Philippe Bruhat (BooK).

=head1 CHANGES

=over 4

=item *

2026-01-12 - v1.015

Updated from the source web site in Acme-MetaSyntactic-Themes version 1.056.

=item *

2021-04-30 - v1.014

Updated from the source web site in Acme-MetaSyntactic-Themes version 1.055.

=item *

2019-10-28 - v1.013

Updated from the source web site in Acme-MetaSyntactic-Themes version 1.054.

=item *

2019-07-29 - v1.012

Updated from the source web site in Acme-MetaSyntactic-Themes version 1.053.

=item *

2017-11-13 - v1.011

Updated from the source web site in Acme-MetaSyntactic-Themes version 1.051.

=item *