r4480 - in
/packages/liblocale-subcountry-perl/branches/upstream/current:
Changes MANIFEST META.yml Makefile.PL examples/ examples/demo.pl
lib/Locale/SubCountry.pm
eloy at users.alioth.debian.org
eloy at users.alioth.debian.org
Fri Dec 1 17:12:01 CET 2006
Author: eloy
Date: Fri Dec 1 17:12:01 2006
New Revision: 4480
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=4480
Log:
Load /tmp/tmp.uBEwJ31537/liblocale-subcountry-perl-1.38 into
packages/liblocale-subcountry-perl/branches/upstream/current.
Added:
packages/liblocale-subcountry-perl/branches/upstream/current/examples/
packages/liblocale-subcountry-perl/branches/upstream/current/examples/demo.pl (with props)
Modified:
packages/liblocale-subcountry-perl/branches/upstream/current/Changes
packages/liblocale-subcountry-perl/branches/upstream/current/MANIFEST
packages/liblocale-subcountry-perl/branches/upstream/current/META.yml
packages/liblocale-subcountry-perl/branches/upstream/current/Makefile.PL
packages/liblocale-subcountry-perl/branches/upstream/current/lib/Locale/SubCountry.pm
Modified: packages/liblocale-subcountry-perl/branches/upstream/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/packages/liblocale-subcountry-perl/branches/upstream/current/Changes?rev=4480&op=diff
==============================================================================
--- packages/liblocale-subcountry-perl/branches/upstream/current/Changes (original)
+++ packages/liblocale-subcountry-perl/branches/upstream/current/Changes Fri Dec 1 17:12:01 2006
@@ -1,4 +1,8 @@
Revision history for Perl CPAN module Locale::SubCountry
+
+1.38 26 Nov 2006
+ Changed sub country names in Sudan and Phillipines
+ Added examples/demo.pl
1.37 02 Apr 2006
Removed invalid characters in data for Iran, United Arab Emirates and Oman
Modified: packages/liblocale-subcountry-perl/branches/upstream/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/packages/liblocale-subcountry-perl/branches/upstream/current/MANIFEST?rev=4480&op=diff
==============================================================================
--- packages/liblocale-subcountry-perl/branches/upstream/current/MANIFEST (original)
+++ packages/liblocale-subcountry-perl/branches/upstream/current/MANIFEST Fri Dec 1 17:12:01 2006
@@ -5,5 +5,6 @@
Changes
t/main.t
t/pod.t
-t/pod-coverage.t
+t/pod-coverage.t
+examples/demo.pl
META.yml
Modified: packages/liblocale-subcountry-perl/branches/upstream/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/packages/liblocale-subcountry-perl/branches/upstream/current/META.yml?rev=4480&op=diff
==============================================================================
--- packages/liblocale-subcountry-perl/branches/upstream/current/META.yml (original)
+++ packages/liblocale-subcountry-perl/branches/upstream/current/META.yml Fri Dec 1 17:12:01 2006
@@ -1,10 +1,13 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
-name: Locale-SubCountry
-version: 1.37
-version_from: lib/Locale/SubCountry.pm
-installdirs: site
-requires:
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.17
+--- #YAML:1.0
+name: Locale-SubCountry
+version: 1.38
+abstract: convert state, province, county ... names to/from ISO 3166-2 code
+license: perl
+generated_by: ExtUtils::MakeMaker version 6.31
+distribution_type: module
+requires:
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.2.html
+ version: 1.2
+author:
+ - Kim Ryan <kimryan at cpan org>
Modified: packages/liblocale-subcountry-perl/branches/upstream/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/packages/liblocale-subcountry-perl/branches/upstream/current/Makefile.PL?rev=4480&op=diff
==============================================================================
--- packages/liblocale-subcountry-perl/branches/upstream/current/Makefile.PL (original)
+++ packages/liblocale-subcountry-perl/branches/upstream/current/Makefile.PL Fri Dec 1 17:12:01 2006
@@ -9,4 +9,5 @@
'ABSTRACT' => 'convert state, province, county ... names to/from ISO 3166-2 code',
'AUTHOR' => 'Kim Ryan <kimryan at cpan org>',
'PREREQ_PM' => {}, # e.g., Module::Name => 1.1
+ 'LICENSE' => 'perl'
);
Added: packages/liblocale-subcountry-perl/branches/upstream/current/examples/demo.pl
URL: http://svn.debian.org/wsvn/pkg-perl/packages/liblocale-subcountry-perl/branches/upstream/current/examples/demo.pl?rev=4480&op=file
==============================================================================
--- packages/liblocale-subcountry-perl/branches/upstream/current/examples/demo.pl (added)
+++ packages/liblocale-subcountry-perl/branches/upstream/current/examples/demo.pl Fri Dec 1 17:12:01 2006
@@ -1,0 +1,32 @@
+#!/usr/bin/perl
+
+# demo script for Locale::SubCountry
+
+use strict;
+use Locale::SubCountry;
+
+# For every country
+# list the country name
+# if any subcountries, list each code and full name on a new line
+
+my $world = new Locale::SubCountry::World;
+my @all_countries = $world->all_full_names;
+
+my %all_letters;
+foreach my $country ( sort @all_countries )
+{
+ print "\n\n$country\n";
+ my $current_country = new Locale::SubCountry($country);
+
+ # Are there any sub countires?
+ if ( $current_country->has_sub_countries )
+ {
+ # Get a hash, key is sub country code, value is full anme, such as
+ # SA => 'South Australia', VIC => 'Victoria' ...
+ my %sub_countries_keyed_by_code = $current_country->code_full_name_hash;
+ foreach my $code ( sort keys %sub_countries_keyed_by_code )
+ {
+ printf("%-3s : %s\n",$code,$sub_countries_keyed_by_code{$code});
+ }
+ }
+}
Propchange: packages/liblocale-subcountry-perl/branches/upstream/current/examples/demo.pl
------------------------------------------------------------------------------
svn:executable = *
Modified: packages/liblocale-subcountry-perl/branches/upstream/current/lib/Locale/SubCountry.pm
URL: http://svn.debian.org/wsvn/pkg-perl/packages/liblocale-subcountry-perl/branches/upstream/current/lib/Locale/SubCountry.pm?rev=4480&op=diff
==============================================================================
--- packages/liblocale-subcountry-perl/branches/upstream/current/lib/Locale/SubCountry.pm (original)
+++ packages/liblocale-subcountry-perl/branches/upstream/current/lib/Locale/SubCountry.pm Fri Dec 1 17:12:01 2006
@@ -372,7 +372,7 @@
package Locale::SubCountry;
-our $VERSION = '1.37';
+our $VERSION = '1.38';
#-------------------------------------------------------------------------------
@@ -15871,6 +15871,9 @@
<regional_division>11</regional_division>
</subcountry>
<subcountry>
+ <name>Shariff Kabunsuan</name>
+ </subcountry>
+ <subcountry>
<name>Siquijor</name>
<code>SIG</code>
<regional_division>07</regional_division>
@@ -17375,8 +17378,8 @@
<code>01</code>
<FIPS>43</FIPS>
</subcountry>
- <subcountry>
- <name>Bahr al Jabal</name>
+ <subcountry>
+ <name>Central Equatoria</name>
<code>17</code>
<FIPS>44</FIPS>
</subcountry>
More information about the Pkg-perl-cvs-commits
mailing list