—

              
use utf8;
use 5.008;
package Business::ISBN::Data;
use strict;
use Carp                  qw(carp);
use File::Basename        qw(dirname);
use File::Spec::Functions qw(catfile);
our $VERSION = '20241130.001';
HideShow 103 lines of Pod
=encoding utf8
=head1 NAME
Business::ISBN::Data - data pack for Business::ISBN
=head1 SYNOPSIS
see L<Business::ISBN>
=head1 DESCRIPTION
You don't need to load this module yourself in most cases. L<Business::ISBN>
will load it when it loads. You must use L<Business::ISBN> 3.005 or later
because the data structure changed slightly to fix a bug with ISBN13
prefixes.
These data are generated from the F<RangeMessage.xml> file provided by
the ISBN Agency. The distributed version matches the date in the version
for this module. You can retrieve this yourself at L<https://www.isbn-international.org/range_file_generation>.
This file is included as part of the distribution and should be installed
at F<~lib/Business/ISBN/Data/RangeMessage.xml>.
If you want to use a different F<RangeMessage.xml> file, you can set
the C<ISBN_RANGE_MESSAGE> environment variable to the alternate location
before you load C<Business::ISBN>. This way, you can use the latest (or
even earlier) data without having to install something new or wait for
an update to this module.
If the default F<RangeMessage.xml> or your alternate one is not available,
the module falls back to data included in F<Data.pm>. However, that data
are likely to be older. If it does not find that file, it looks
for F<RangeMessage.xml> in the current directory.
The data are in C<%Business::ISBN::country_data> (although the "country"
part is historical). If you want to see where the data are from, check
C<$Business::ISBN::country_data{_source}>.
=head2 Packaging this module
The included F<RangeMessage.xml> is in under F<lib/> at the same level
as F<Data.pm>. The same data exist as the default data in the code, so
you don't need to pass along the distributed F<RangeMessage.xml>.
However, you can include a newer F<RangeMessage.xml>.
With PAR, you can add extra files to the archive with C<-a>. Put the
new file somewhere the module will find it (or use C<ISBN_RANGE_MESSAGE>
to lead it there):
        pp ... -a '..../RangeMessage.xml;RangeMessage.xml'
If you put the F<RangeMessage.xml> in the current working directory of
the application, the module should find it.
=head2 Updating the default data
In the repo, find the F<examples/make_default_data.pl> program. Run
that against the latest F<RangeMessage.xml>:
        % perl -Ilib examples/make_default_data.pl RangeMessage.xml
That produces the code you need to replace in the module. Check that
that data aren't weird: sometimes the group names have errors or
oddities. The program handles escaping single quotes and trimming
white space.
=head1 SOURCE AVAILABILITY
This module lives in a Github repository:
        https://github.com/briandfoy/business-isbn-data
You are probably also interested in the module that uses it:
        https://github.com/briandfoy/business-isbn
If you have something to add, create a fork on Github and send a
pull request.
=head1 AUTHOR
brian d foy, C<< <briandfoy@pobox.com> >>
Yakov Shafranovich updated the data in October 2008.
Daniel Jakubik updated the data in July 2012.
Markus Spann suggested looking for F<RangeMessage.xml> in the current
directory to make it work with Perl app bundlers.
Josef Moravec C<< <josef.moravec@gmail.com> >> updated the data in January 2019.
Peter Williams fixed a serious issue with ISBN-13 (GitHub #5). You must
use Business::ISBN 3.005 or later because the data structure changed.
=head1 COPYRIGHT AND LICENSE
Copyright © 2002-2024, brian d foy <briandfoy@pobox.com>. All rights reserved.
You may redistribute this under the terms of the Artistic License 2.0.
=cut
sub _default_data {
# BEGIN REPLACE
        (
        _data_date => 'Sat, 30 Nov 2024 03:45:14 GMT',
        _serial    => '0fbfa7be-1205-4747-88ad-f30c0544f7c5',
        _source    => __FILE__,
        978 => {
                0     => [ 'English language'             => [ '00', '19', '200', '227', '2280', '2289', '229', '368', '3690', '3699', '370', '638', '6390', '6397', '6398000', '6399999', '640', '644', '6450000', '6459999', '646', '647', '6480000', '6489999', '649', '654', '6550', '6559', '656', '699', '7000', '8499', '85000', '89999', '900000', '900370', '9003710', '9003719', '900372', '949999', '9500000', '9999999' ] ],
                1     => [ 'English language'             => [ '000', '009', '01', '02', '030', '034', '0350', '0399', '040', '049', '05', '05', '0670000', '0699999', '0700', '0999', '100', '397', '3980', '5499', '55000', '64999', '6500', '6799', '68000', '68599', '6860', '7139', '714', '716', '7170', '7319', '7320000', '7399999', '74000', '76199', '7620', '7634', '7635000', '7649999', '76500', '77499', '7750000', '7753999', '77540', '77639', '7764000', '7764999', '77650', '77699', '7770000', '7782999', '77830', '78999', '7900', '7999', '80000', '80049', '80050', '80499', '80500', '83799', '8380000', '8384999', '83850', '86719', '8672', '8675', '86760', '86979', '869800', '915999', '9160000', '9165059', '916506', '916869', '9168700', '9169079', '916908', '919599', '9196000', '9196549', '919655', '972999', '9730', '9877', '987800', '991149', '9911500', '9911999', '991200', '998989', '9989900', '9999999' ] ],
                2     => [ 'French language'              => [ '00', '19', '200', '349', '35000', '39999', '400', '486', '487000', '494999', '495', '495', '4960', '4966', '49670', '49699', '497', '527', '5280', '5299', '530', '699', '7000', '8399', '84000', '89999', '900000', '919799', '91980', '91980', '919810', '919942', '9199430', '9199689', '919969', '949999', '9500000', '9999999' ] ],
                3     => [ 'German language'              => [ '00', '02', '030', '033', '0340', '0369', '03700', '03999', '04', '19', '200', '389', '39', '39', '400', '688', '68900', '69499', '6950', '8499', '85000', '89999', '900000', '949999', '9500000', '9539999', '95400', '96999', '9700000', '9849999', '98500', '99959', '9996', '9999' ] ],
                4     => [ 'Japan'                        => [ '00', '19', '200', '699', '7000', '8499', '85000', '89999', '900000', '949999', '9500000', '9999999' ] ],
                5     => [ 'former U.S.S.R'               => [ '00000', '00499', '0050', '0099', '01', '19', '200', '361', '3620', '3623', '36240', '36299', '363', '420', '4210', '4299', '430', '430', '4310', '4399', '440', '440', '4410', '4499', '450', '603', '6040000', '6049999', '605', '699', '7000', '8499', '85000', '89999', '900000', '909999', '91000', '91999', '9200', '9299', '93000', '94999', '9500000', '9500999', '9501', '9799', '98000', '98999', '9900000', '9909999', '9910', '9999' ] ],
                7     => [ 'China, People\'s Republic'    => [ '00', '09', '100', '499', '5000', '7999', '80000', '89999', '900000', '999999' ] ],
                65    => [ 'Brazil'                       => [ '00', '01', '250', '299', '300', '302', '5000', '5129', '5200', '6149', '80000', '81824', '83000', '89999', '900000', '902449', '980000', '999999' ] ],
                80    => [ 'former Czechoslovakia'        => [ '00', '19', '200', '529', '53000', '54999', '550', '689', '69000', '69999', '7000', '8499', '85000', '89999', '900000', '998999', '99900', '99999' ] ],
                81    => [ 'India'                        => [ '00', '18', '19000', '19999', '200', '699', '7000', '8499', '85000', '89999', '900000', '999999' ] ],
                82    => [ 'Norway'                       => [ '00', '19', '200', '689', '690000', '699999', '7000', '8999', '90000', '98999', '990000', '999999' ] ],
                83    => [ 'Poland'                       => [ '00', '19', '200', '599', '60000', '69999', '7000', '8499', '85000', '89999', '900000', '999999' ] ],
                84    => [ 'Spain'                        => [ '00', '09', '10000', '10499', '1050', '1199', '120000', '129999', '1300', '1399', '140', '149', '15000', '19999', '200', '699', '7000', '8499', '85000', '89999', '9000', '9199', '920000', '923999', '92400', '92999', '930000', '949999', '95000', '96999', '9700', '9999' ] ],
                85    => [ 'Brazil'                       => [ '00', '19', '200', '454', '455000', '455299', '45530', '45599', '456', '528', '52900', '53199', '5320', '5339', '534', '539', '54000', '54029', '54030', '54039', '540400', '540499', '54050', '54089', '540900', '540999', '54100', '54399', '5440', '5479', '54800', '54999', '5500', '5999', '60000', '69999', '7000', '8499', '85000', '89999', '900000', '924999', '92500', '94499', '9450', '9599', '96', '97', '98000', '99999' ] ],
                86    => [ 'former Yugoslavia'            => [ '00', '29', '300', '599', '6000', '7999', '80000', '89999', '900000', '999999' ] ],
                87    => [ 'Denmark'                      => [ '00', '29', '400', '649', '7000', '7999', '85000', '94999', '970000', '999999' ] ],
                88    => [ 'Italy'                        => [ '00', '19', '200', '311', '31200', '31499', '315', '318', '31900', '32299', '323', '326', '3270', '3389', '339', '360', '3610', '3629', '363', '548', '5490', '5549', '555', '599', '6000', '8499', '85000', '89999', '900000', '909999', '910', '926', '9270', '9399', '940000', '947999', '94800', '99999' ] ],
                89    => [ 'Korea, Republic'              => [ '00', '24', '250', '549', '5500', '8499', '85000', '94999', '950000', '969999', '97000', '98999', '990', '999' ] ],
                90    => [ 'Netherlands'                  => [ '00', '19', '200', '499', '5000', '6999', '70000', '79999', '800000', '849999', '8500', '8999', '90', '90', '94', '94' ] ],
                91    => [ 'Sweden'                       => [ '0', '1', '20', '49', '500', '649', '7000', '8199', '85000', '94999', '970000', '999999' ] ],
                92    => [ 'International NGO Publishers and EU Organizations' => [ '0', '5', '60', '79', '800', '899', '9000', '9499', '95000', '98999', '990000', '999999' ] ],
                93    => [ 'India'                        => [ '00', '09', '100', '479', '48000', '49999', '5000', '7999', '80000', '95999', '960000', '999999' ] ],
                94    => [ 'Netherlands'                  => [ '000', '599', '6000', '6387', '638800', '638809', '63881', '63881', '638820', '638839', '63884', '63885', '638860', '638869', '63887', '63889', '6389', '6395', '639600', '639609', '63961', '63962', '639630', '639639', '63964', '63964', '639650', '639659', '63966', '63969', '6397', '6399', '640000', '640009', '64001', '64004', '640050', '640059', '64006', '64006', '640070', '640089', '64009', '64009', '6401', '6406', '640700', '640739', '64074', '64074', '640750', '640759', '64076', '64077', '640780', '640799', '6408', '6419', '64200', '64201', '642020', '642029', '64203', '64203', '642040', '642049', '64205', '64206', '642070', '642079', '64208', '64208', '642090', '642099', '6421', '6432', '64330', '64331', '643320', '643329', '64333', '64333', '643340', '643359', '64336', '64336', '643370', '643379', '64338', '64339', '6434', '6435', '643600', '643609', '64361', '64363', '643640', '643659', '64366', '64366', '643670', '643679', '64368', '64369', '6437', '6443', '644400', '644409', '64441', '64441', '644420', '644429', '64443', '64443', '644440', '644449', '64445', '64446', '644470', '644489', '64449', '64449', '6445', '6450', '64510', '64512', '645130', '645139', '64514', '64515', '645160', '645199', '6452', '6458', '645900', '645909', '64591', '64592', '645930', '645949', '64595', '64596', '645970', '645989', '64599', '64599', '6460', '6465', '646600', '646609', '64661', '64662', '646630', '646659', '64666', '64666', '646670', '646689', '64669', '64669', '6467', '6474', '64750', '64751', '647520', '647539', '64754', '64754', '647550', '647559', '64756', '64757', '647580', '647589', '64759', '64759', '6476', '6476', '647700', '647708', '64771', '64771', '647723', '647729', '64773', '64773', '647740', '647769', '64777', '64779', '647800', '647809', '64781', '64781', '647820', '647829', '64783', '64786', '647870', '647879', '64788', '64789', '6479', '6493', '649400', '649409', '64941', '64942', '649430', '649449', '64945', '64946', '649470', '649479', '64948', '64948', '649490', '649499', '6495', '6497', '64980', '64980', '649810', '649829', '64983', '64984', '649850', '649869', '64987', '64987', '649880', '649899', '6499', '8999', '90000', '99999' ] ],
                600   => [ 'Iran'                         => [ '00', '09', '100', '499', '5000', '8999', '90000', '98679', '9868', '9929', '993', '995', '99600', '99999' ] ],
                601   => [ 'Kazakhstan'                   => [ '00', '19', '200', '699', '7000', '7999', '80000', '84999', '85', '99' ] ],
                602   => [ 'Indonesia'                    => [ '00', '06', '0700', '1399', '14000', '14999', '1500', '1699', '17000', '19999', '200', '499', '50000', '53999', '5400', '5999', '60000', '61999', '6200', '6999', '70000', '74999', '7500', '9499', '95000', '99999' ] ],
                603   => [ 'Saudi Arabia'                 => [ '00', '04', '05', '49', '500', '799', '8000', '8999', '90000', '99999' ] ],
                604   => [ 'Vietnam'                      => [ '0', '2', '300', '399', '40', '46', '470', '497', '4980', '4999', '50', '89', '900', '979', '9800', '9999' ] ],
                605   => [ 'Türkiye'                      => [ '00', '02', '030', '039', '04', '05', '06000', '06999', '07', '09', '100', '199', '2000', '2399', '240', '399', '4000', '5999', '60000', '74999', '7500', '7999', '80000', '89999', '9000', '9999' ] ],
                606   => [ 'Romania'                      => [ '000', '099', '10', '49', '500', '799', '8000', '9099', '910', '919', '92000', '95999', '9600', '9749', '975', '999' ] ],
                607   => [ 'Mexico'                       => [ '00', '25', '2600', '2649', '26500', '26999', '27', '39', '400', '588', '5890', '5929', '59300', '59999', '600', '694', '69500', '69999', '700', '749', '7500', '9499', '95000', '99999' ] ],
                608   => [ 'North Macedonia'              => [ '0', '0', '10', '19', '200', '449', '4500', '6499', '65000', '69999', '7', '9' ] ],
                609   => [ 'Lithuania'                    => [ '00', '39', '400', '799', '8000', '9499', '95000', '99999' ] ],
                611   => [ 'Thailand'                     => [  ] ],
                612   => [ 'Peru'                         => [ '00', '29', '300', '399', '4000', '4499', '45000', '49999', '5000', '5224' ] ],
                613   => [ 'Mauritius'                    => [ '0', '9' ] ],
                614   => [ 'Lebanon'                      => [ '00', '39', '400', '799', '8000', '9499', '95000', '99999' ] ],
                615   => [ 'Hungary'                      => [ '00', '09', '100', '499', '5000', '7999', '80000', '89999' ] ],
                616   => [ 'Thailand'                     => [ '00', '19', '200', '699', '7000', '8999', '90000', '99999' ] ],
                617   => [ 'Ukraine'                      => [ '00', '49', '500', '699', '7000', '8999', '90000', '99999' ] ],
                618   => [ 'Greece'                       => [ '00', '19', '200', '499', '5000', '7999', '80000', '99999' ] ],
                619   => [ 'Bulgaria'                     => [ '00', '14', '150', '699', '7000', '8999', '90000', '99999' ] ],
                620   => [ 'Mauritius'                    => [ '0', '9' ] ],
                621   => [ 'Philippines'                  => [ '00', '29', '400', '599', '8000', '8999', '95000', '99999' ] ],
                622   => [ 'Iran'                         => [ '00', '10', '200', '459', '4600', '8749', '87500', '99999' ] ],
                623   => [ 'Indonesia'                    => [ '00', '10', '110', '524', '5250', '8799', '88000', '99999' ] ],
                624   => [ 'Sri Lanka'                    => [ '00', '04', '200', '249', '5000', '6699', '93000', '99999' ] ],
                625   => [ 'Türkiye'                      => [ '00', '01', '320', '442', '44300', '44499', '445', '449', '5500', '7793', '77940', '77949', '7795', '8499', '94000', '99999' ] ],
                626   => [ 'Taiwan'                       => [ '00', '04', '300', '499', '7000', '7999', '95000', '99999' ] ],
                627   => [ 'Pakistan'                     => [ '30', '31', '500', '524', '7500', '7999', '94500', '94649' ] ],
                628   => [ 'Colombia'                     => [ '00', '09', '500', '549', '7500', '8499', '95000', '99999' ] ],
                629   => [ 'Malaysia'                     => [ '00', '02', '460', '499', '7500', '7999', '95000', '99999' ] ],
                630   => [ 'Romania'                      => [ '300', '399', '6500', '6849', '95000', '99999' ] ],
                631   => [ 'Argentina'                    => [ '00', '09', '300', '399', '6500', '7499', '90000', '99999' ] ],
                632   => [ 'Vietnam'                      => [ '00', '11', '600', '679' ] ],
                633   => [ 'Egypt'                        => [ '00', '01', '300', '349', '8250', '8999', '99500', '99999' ] ],
                634   => [ 'Indonesia'                    => [ '00', '04', '200', '349', '7000', '7999', '96000', '99999' ] ],
                950   => [ 'Argentina'                    => [ '00', '49', '500', '899', '9000', '9899', '99000', '99999' ] ],
                951   => [ 'Finland'                      => [ '0', '1', '20', '54', '550', '889', '8900', '9499', '95000', '99999' ] ],
                952   => [ 'Finland'                      => [ '00', '19', '200', '499', '5000', '5999', '60', '64', '65000', '65999', '6600', '6699', '67000', '69999', '7000', '7999', '80', '94', '9500', '9899', '99000', '99999' ] ],
                953   => [ 'Croatia'                      => [ '0', '0', '10', '14', '150', '459', '46000', '49999', '500', '500', '50100', '50999', '51', '54', '55000', '59999', '6000', '9499', '95000', '99999' ] ],
                954   => [ 'Bulgaria'                     => [ '00', '28', '2900', '2999', '300', '799', '8000', '8999', '90000', '92999', '9300', '9999' ] ],
                955   => [ 'Sri Lanka'                    => [ '0000', '1999', '20', '33', '3400', '3549', '35500', '35999', '3600', '3799', '38000', '38999', '3900', '4099', '41000', '44999', '4500', '4999', '50000', '54999', '550', '710', '71100', '71499', '7150', '9499', '95000', '99999' ] ],
                956   => [ 'Chile'                        => [ '00', '07', '08000', '08499', '09000', '09999', '10', '19', '200', '599', '6000', '6999', '7000', '9999' ] ],
                957   => [ 'Taiwan'                       => [ '00', '02', '0300', '0499', '05', '19', '2000', '2099', '21', '27', '28000', '30999', '31', '43', '440', '819', '8200', '9699', '97000', '99999' ] ],
                958   => [ 'Colombia'                     => [ '00', '49', '500', '509', '5100', '5199', '52000', '53999', '5400', '5599', '56000', '59999', '600', '799', '8000', '9499', '95000', '99999' ] ],
                959   => [ 'Cuba'                         => [ '00', '19', '200', '699', '7000', '8499', '85000', '99999' ] ],
                960   => [ 'Greece'                       => [ '00', '19', '200', '659', '6600', '6899', '690', '699', '7000', '8499', '85000', '92999', '93', '93', '9400', '9799', '98000', '99999' ] ],
                961   => [ 'Slovenia'                     => [ '00', '19', '200', '599', '6000', '8999', '90000', '97999' ] ],
                962   => [ 'Hong Kong, China'             => [ '00', '19', '200', '699', '7000', '8499', '85000', '86999', '8700', '8999', '900', '999' ] ],
                963   => [ 'Hungary'                      => [ '00', '19', '200', '699', '7000', '8499', '85000', '89999', '9000', '9999' ] ],
                964   => [ 'Iran'                         => [ '00', '14', '150', '249', '2500', '2999', '300', '549', '5500', '8999', '90000', '96999', '970', '989', '9900', '9999' ] ],
                965   => [ 'Israel'                       => [ '00', '19', '200', '599', '7000', '7999', '90000', '99999' ] ],
                966   => [ 'Ukraine'                      => [ '00', '12', '130', '139', '14', '14', '1500', '1699', '170', '199', '2000', '2789', '279', '289', '2900', '2999', '300', '699', '7000', '8999', '90000', '90999', '910', '949', '95000', '97999', '980', '999' ] ],
                967   => [ 'Malaysia'                     => [ '0000', '0999', '10000', '19999', '2000', '2499', '250', '254', '25500', '26999', '2700', '2799', '2800', '2999', '300', '499', '5000', '5999', '60', '89', '900', '989', '9900', '9989', '99900', '99999' ] ],
                968   => [ 'Mexico'                       => [ '01', '39', '400', '499', '5000', '7999', '800', '899', '9000', '9999' ] ],
                969   => [ 'Pakistan'                     => [ '0', '1', '20', '20', '210', '219', '2200', '2299', '23000', '23999', '24', '39', '400', '749', '7500', '9999' ] ],
                970   => [ 'Mexico'                       => [ '01', '59', '600', '899', '9000', '9099', '91000', '96999', '9700', '9999' ] ],
                971   => [ 'Philippines'                  => [ '000', '015', '0160', '0199', '02', '02', '0300', '0599', '06', '49', '500', '849', '8500', '9099', '91000', '95999', '9600', '9699', '97', '98', '9900', '9999' ] ],
                972   => [ 'Portugal'                     => [ '0', '1', '20', '54', '550', '799', '8000', '9499', '95000', '99999' ] ],
                973   => [ 'Romania'                      => [ '0', '0', '100', '169', '1700', '1999', '20', '54', '550', '759', '7600', '8499', '85000', '88999', '8900', '9499', '95000', '99999' ] ],
                974   => [ 'Thailand'                     => [ '00', '19', '200', '699', '7000', '8499', '85000', '89999', '90000', '94999', '9500', '9999' ] ],
                975   => [ 'Türkiye'                      => [ '00000', '01999', '02', '23', '2400', '2499', '250', '599', '6000', '9199', '92000', '98999', '990', '999' ] ],
                976   => [ 'Caribbean Community'          => [ '0', '3', '40', '59', '600', '799', '8000', '9499', '95000', '99999' ] ],
                977   => [ 'Egypt'                        => [ '00', '19', '200', '499', '5000', '6999', '700', '849', '85000', '87399', '8740', '8899', '890', '894', '8950', '8999', '90', '95', '9600', '9699', '970', '999' ] ],
                978   => [ 'Nigeria'                      => [ '000', '199', '2000', '2999', '30000', '69999', '765', '799', '8000', '8999', '900', '999' ] ],
                979   => [ 'Indonesia'                    => [ '000', '099', '1000', '1499', '15000', '19999', '20', '29', '3000', '3999', '400', '799', '8000', '9499', '95000', '99999' ] ],
                980   => [ 'Venezuela'                    => [ '00', '19', '200', '599', '6000', '9999' ] ],
                981   => [ 'Singapore'                    => [ '00', '16', '17000', '17999', '18', '19', '200', '299', '3000', '3099', '310', '399', '4000', '5999', '94', '94', '96', '99' ] ],
                982   => [ 'South Pacific'                => [ '00', '09', '100', '699', '70', '89', '9000', '9799', '98000', '99999' ] ],
                983   => [ 'Malaysia'                     => [ '00', '01', '020', '199', '2000', '3999', '40000', '44999', '45', '49', '50', '79', '800', '899', '9000', '9899', '99000', '99999' ] ],
                984   => [ 'Bangladesh'                   => [ '00', '39', '400', '799', '8000', '8999', '90000', '99999' ] ],
                985   => [ 'Belarus'                      => [ '00', '39', '400', '599', '6000', '8799', '880', '899', '90000', '99999' ] ],
                986   => [ 'Taiwan'                       => [ '00', '05', '06000', '06999', '0700', '0799', '08', '11', '120', '539', '5400', '7999', '80000', '99999' ] ],
                987   => [ 'Argentina'                    => [ '00', '09', '1000', '1999', '20000', '29999', '30', '35', '3600', '4199', '42', '43', '4400', '4499', '45000', '48999', '4900', '4999', '500', '824', '8250', '8279', '82800', '82999', '8300', '8499', '85', '88', '8900', '9499', '95000', '99999' ] ],
                988   => [ 'Hong Kong, China'             => [ '00', '11', '12000', '19999', '200', '699', '70000', '79999', '8000', '9699', '97000', '99999' ] ],
                989   => [ 'Portugal'                     => [ '0', '1', '20', '34', '35000', '36999', '37', '52', '53000', '54999', '550', '799', '8000', '9499', '95000', '99999' ] ],
                9908  => [ 'Estonia'                      => [ '0', '1', '50', '69', '825', '899', '9700', '9999' ] ],
                9909  => [ 'Tunisia'                      => [ '00', '19', '750', '849', '9800', '9999' ] ],
                9910  => [ 'Uzbekistan'                   => [ '01', '09', '650', '799', '8800', '9999' ] ],
                9911  => [ 'Montenegro'                   => [ '20', '24', '550', '749', '9500', '9999' ] ],
                9912  => [ 'Tanzania'                     => [ '40', '44', '750', '799', '9800', '9999' ] ],
                9913  => [ 'Uganda'                       => [ '00', '07', '600', '699', '9550', '9999' ] ],
                9914  => [ 'Kenya'                        => [ '35', '55', '700', '774', '9450', '9999' ] ],
                9915  => [ 'Uruguay'                      => [ '40', '59', '650', '799', '9300', '9999' ] ],
                9916  => [ 'Estonia'                      => [ '0', '0', '10', '39', '4', '5', '600', '789', '79', '91', '9200', '9399', '94', '94', '9500', '9999' ] ],
                9917  => [ 'Bolivia'                      => [ '0', '0', '30', '34', '600', '699', '9700', '9999' ] ],
                9918  => [ 'Malta'                        => [ '0', '0', '20', '29', '600', '799', '9500', '9999' ] ],
                9919  => [ 'Mongolia'                     => [ '0', '0', '20', '29', '500', '599', '9000', '9999' ] ],
                9920  => [ 'Morocco'                      => [ '23', '42', '430', '799', '8550', '9999' ] ],
                9921  => [ 'Kuwait'                       => [ '0', '0', '30', '39', '700', '899', '9700', '9999' ] ],
                9922  => [ 'Iraq'                         => [ '20', '29', '600', '799', '8250', '9999' ] ],
                9923  => [ 'Jordan'                       => [ '0', '0', '10', '69', '700', '899', '9400', '9999' ] ],
                9924  => [ 'Cambodia'                     => [ '28', '39', '500', '659', '8950', '9999' ] ],
                9925  => [ 'Cyprus'                       => [ '0', '2', '30', '54', '550', '734', '7350', '9999' ] ],
                9926  => [ 'Bosnia and Herzegovina'       => [ '0', '1', '20', '39', '400', '799', '8000', '9999' ] ],
                9927  => [ 'Qatar'                        => [ '00', '09', '100', '399', '4000', '4999' ] ],
                9928  => [ 'Albania'                      => [ '00', '09', '100', '399', '4000', '4999', '800', '899', '90', '99' ] ],
                9929  => [ 'Guatemala'                    => [ '0', '3', '40', '54', '550', '799', '8000', '9999' ] ],
                9930  => [ 'Costa Rica'                   => [ '00', '49', '500', '939', '9400', '9999' ] ],
                9931  => [ 'Algeria'                      => [ '00', '23', '240', '899', '9000', '9999' ] ],
                9932  => [ 'Lao People\'s Democratic Republic' => [ '00', '39', '400', '849', '8500', '9999' ] ],
                9933  => [ 'Syria'                        => [ '0', '0', '10', '39', '400', '869', '87', '89', '9000', '9999' ] ],
                9934  => [ 'Latvia'                       => [ '0', '0', '10', '49', '500', '799', '8000', '9999' ] ],
                9935  => [ 'Iceland'                      => [ '0', '0', '10', '39', '400', '899', '9000', '9999' ] ],
                9936  => [ 'Afghanistan'                  => [ '0', '1', '20', '39', '400', '799', '8000', '9999' ] ],
                9937  => [ 'Nepal'                        => [ '0', '2', '30', '49', '500', '799', '8000', '9999' ] ],
                9938  => [ 'Tunisia'                      => [ '00', '79', '800', '949', '9500', '9749', '975', '990', '9910', '9999' ] ],
                9939  => [ 'Armenia'                      => [ '0', '3', '40', '47', '480', '499', '50', '79', '800', '899', '9000', '9599', '960', '979', '98', '99' ] ],
                9940  => [ 'Montenegro'                   => [ '0', '1', '20', '49', '500', '839', '84', '86', '8700', '9999' ] ],
                9941  => [ 'Georgia'                      => [ '0', '0', '10', '39', '400', '799', '8', '8', '9000', '9999' ] ],
                9942  => [ 'Ecuador'                      => [ '00', '59', '600', '699', '7000', '7499', '750', '849', '8500', '8999', '900', '984', '9850', '9999' ] ],
                9943  => [ 'Uzbekistan'                   => [ '00', '29', '300', '399', '4000', '9749', '975', '999' ] ],
                9944  => [ 'Türkiye'                      => [ '0000', '0999', '100', '499', '5000', '5999', '60', '69', '700', '799', '80', '89', '900', '999' ] ],
                9945  => [ 'Dominican Republic'           => [ '00', '00', '010', '079', '08', '39', '400', '569', '57', '57', '580', '799', '80', '80', '810', '849', '8500', '9999' ] ],
                9946  => [ 'Korea, P.D.R.'                => [ '0', '1', '20', '39', '400', '899', '9000', '9999' ] ],
                9947  => [ 'Algeria'                      => [ '0', '1', '20', '79', '800', '999' ] ],
                9948  => [ 'United Arab Emirates'         => [ '00', '39', '400', '849', '8500', '9999' ] ],
                9949  => [ 'Estonia'                      => [ '00', '08', '090', '099', '10', '39', '400', '699', '70', '71', '7200', '7499', '75', '89', '9000', '9999' ] ],
                9950  => [ 'Palestine'                    => [ '00', '29', '300', '849', '8500', '9999' ] ],
                9951  => [ 'Kosova'                       => [ '00', '38', '390', '849', '8500', '9799', '980', '999' ] ],
                9952  => [ 'Azerbaijan'                   => [ '0', '1', '20', '39', '400', '799', '8000', '9999' ] ],
                9953  => [ 'Lebanon'                      => [ '0', '0', '10', '39', '400', '599', '60', '89', '9000', '9299', '93', '96', '970', '999' ] ],
                9954  => [ 'Morocco'                      => [ '0', '1', '20', '39', '400', '799', '8000', '9899', '99', '99' ] ],
                9955  => [ 'Lithuania'                    => [ '00', '39', '400', '929', '9300', '9999' ] ],
                9956  => [ 'Cameroon'                     => [ '0', '0', '10', '39', '400', '899', '9000', '9999' ] ],
                9957  => [ 'Jordan'                       => [ '00', '39', '400', '649', '65', '67', '680', '699', '70', '84', '8500', '8799', '88', '99' ] ],
                9958  => [ 'Bosnia and Herzegovina'       => [ '00', '01', '020', '029', '0300', '0399', '040', '089', '0900', '0999', '10', '18', '1900', '1999', '20', '49', '500', '899', '9000', '9999' ] ],
                9959  => [ 'Libya'                        => [ '0', '1', '20', '79', '800', '949', '9500', '9699', '970', '979', '98', '99' ] ],
                9960  => [ 'Saudi Arabia'                 => [ '00', '59', '600', '899', '9000', '9999' ] ],
                9961  => [ 'Algeria'                      => [ '0', '2', '30', '69', '700', '949', '9500', '9999' ] ],
                9962  => [ 'Panama'                       => [ '00', '54', '5500', '5599', '56', '59', '600', '849', '8500', '9999' ] ],
                9963  => [ 'Cyprus'                       => [ '0', '1', '2000', '2499', '250', '279', '2800', '2999', '30', '54', '550', '734', '7350', '7499', '7500', '9999' ] ],
                9964  => [ 'Ghana'                        => [ '0', '6', '70', '94', '950', '999' ] ],
                9965  => [ 'Kazakhstan'                   => [ '00', '39', '400', '899', '9000', '9999' ] ],
                9966  => [ 'Kenya'                        => [ '000', '139', '14', '14', '1500', '1999', '20', '69', '7000', '7499', '750', '820', '8210', '8249', '825', '825', '8260', '8289', '829', '959', '9600', '9999' ] ],
                9967  => [ 'Kyrgyz Republic'              => [ '00', '39', '400', '899', '9000', '9999' ] ],
                9968  => [ 'Costa Rica'                   => [ '00', '49', '500', '939', '9400', '9999' ] ],
                9969  => [ 'Algeria'                      => [ '00', '06', '500', '649', '9700', '9999' ] ],
                9970  => [ 'Uganda'                       => [ '00', '39', '400', '899', '9000', '9999' ] ],
                9971  => [ 'Singapore'                    => [ '0', '5', '60', '89', '900', '989', '9900', '9999' ] ],
                9972  => [ 'Peru'                         => [ '00', '09', '1', '1', '200', '249', '2500', '2999', '30', '59', '600', '899', '9000', '9999' ] ],
                9973  => [ 'Tunisia'                      => [ '00', '05', '060', '089', '0900', '0999', '10', '69', '700', '969', '9700', '9999' ] ],
                9974  => [ 'Uruguay'                      => [ '0', '2', '30', '54', '550', '749', '7500', '8799', '880', '909', '91', '94', '95', '99' ] ],
                9975  => [ 'Moldova'                      => [ '0', '0', '100', '299', '3000', '3999', '4000', '4499', '45', '89', '900', '949', '9500', '9999' ] ],
                9976  => [ 'Tanzania'                     => [ '0', '4', '5000', '5799', '580', '589', '59', '89', '900', '989', '9900', '9999' ] ],
                9977  => [ 'Costa Rica'                   => [ '00', '89', '900', '989', '9900', '9999' ] ],
                9978  => [ 'Ecuador'                      => [ '00', '29', '300', '399', '40', '94', '950', '989', '9900', '9999' ] ],
                9979  => [ 'Iceland'                      => [ '0', '4', '50', '64', '650', '659', '66', '75', '760', '899', '9000', '9999' ] ],
                9980  => [ 'Papua New Guinea'             => [ '0', '3', '40', '89', '900', '989', '9900', '9999' ] ],
                9981  => [ 'Morocco'                      => [ '00', '09', '100', '159', '1600', '1999', '20', '79', '800', '949', '9500', '9999' ] ],
                9982  => [ 'Zambia'                       => [ '00', '79', '800', '989', '9900', '9999' ] ],
                9983  => [ 'Gambia'                       => [ '80', '94', '950', '989', '9900', '9999' ] ],
                9984  => [ 'Latvia'                       => [ '00', '49', '500', '899', '9000', '9999' ] ],
                9985  => [ 'Estonia'                      => [ '0', '4', '50', '79', '800', '899', '9000', '9999' ] ],
                9986  => [ 'Lithuania'                    => [ '00', '39', '400', '899', '9000', '9399', '940', '969', '97', '99' ] ],
                9987  => [ 'Tanzania'                     => [ '00', '39', '400', '879', '8800', '9999' ] ],
                9988  => [ 'Ghana'                        => [ '0', '3', '40', '54', '550', '749', '7500', '9999' ] ],
                9989  => [ 'North Macedonia'              => [ '0', '0', '100', '199', '2000', '2999', '30', '59', '600', '949', '9500', '9999' ] ],
                99901 => [ 'Bahrain'                      => [ '00', '49', '500', '799', '80', '99' ] ],
                99902 => [ 'Reserved Agency'              => [  ] ],
                99903 => [ 'Mauritius'                    => [ '0', '1', '20', '89', '900', '999' ] ],
                99904 => [ 'Curaçao'                      => [ '0', '5', '60', '89', '900', '999' ] ],
                99905 => [ 'Bolivia'                      => [ '0', '3', '40', '79', '800', '999' ] ],
                99906 => [ 'Kuwait'                       => [ '0', '2', '30', '59', '600', '699', '70', '89', '90', '94', '950', '999' ] ],
                99908 => [ 'Malawi'                       => [ '0', '0', '10', '89', '900', '999' ] ],
                99909 => [ 'Malta'                        => [ '0', '3', '40', '94', '950', '999' ] ],
                99910 => [ 'Sierra Leone'                 => [ '0', '2', '30', '89', '900', '999' ] ],
                99911 => [ 'Lesotho'                      => [ '00', '59', '600', '999' ] ],
                99912 => [ 'Botswana'                     => [ '0', '3', '400', '599', '60', '89', '900', '999' ] ],
                99913 => [ 'Andorra'                      => [ '0', '2', '30', '35', '600', '604' ] ],
                99914 => [ 'International NGO Publishers' => [ '0', '4', '50', '69', '7', '7', '80', '86', '870', '879', '88', '89', '900', '999' ] ],
                99915 => [ 'Maldives'                     => [ '0', '4', '50', '79', '800', '999' ] ],
                99916 => [ 'Namibia'                      => [ '0', '2', '30', '69', '700', '999' ] ],
                99917 => [ 'Brunei Darussalam'            => [ '0', '2', '30', '88', '890', '999' ] ],
                99918 => [ 'Faroe Islands'                => [ '0', '3', '40', '79', '800', '999' ] ],
                99919 => [ 'Benin'                        => [ '0', '2', '300', '399', '40', '79', '800', '999' ] ],
                99920 => [ 'Andorra'                      => [ '0', '4', '50', '89', '900', '999' ] ],
                99921 => [ 'Qatar'                        => [ '0', '1', '20', '69', '700', '799', '8', '8', '90', '99' ] ],
                99922 => [ 'Guatemala'                    => [ '0', '3', '40', '69', '700', '999' ] ],
                99923 => [ 'El Salvador'                  => [ '0', '1', '20', '79', '800', '999' ] ],
                99924 => [ 'Nicaragua'                    => [ '0', '1', '20', '79', '800', '999' ] ],
                99925 => [ 'Paraguay'                     => [ '0', '0', '10', '19', '200', '299', '3', '3', '40', '79', '800', '999' ] ],
                99926 => [ 'Honduras'                     => [ '0', '0', '10', '59', '600', '869', '87', '89', '90', '99' ] ],
                99927 => [ 'Albania'                      => [ '0', '2', '30', '59', '600', '999' ] ],
                99928 => [ 'Georgia'                      => [ '0', '0', '10', '79', '800', '999' ] ],
                99929 => [ 'Mongolia'                     => [ '0', '4', '50', '79', '800', '999' ] ],
                99930 => [ 'Armenia'                      => [ '0', '4', '50', '79', '800', '999' ] ],
                99931 => [ 'Seychelles'                   => [ '0', '4', '50', '79', '800', '999' ] ],
                99932 => [ 'Malta'                        => [ '0', '0', '10', '59', '600', '699', '7', '7', '80', '99' ] ],
                99933 => [ 'Nepal'                        => [ '0', '2', '30', '59', '600', '999' ] ],
                99934 => [ 'Dominican Republic'           => [ '0', '1', '20', '79', '800', '999' ] ],
                99935 => [ 'Haiti'                        => [ '0', '2', '30', '59', '600', '699', '7', '8', '90', '99' ] ],
                99936 => [ 'Bhutan'                       => [ '0', '0', '10', '59', '600', '999' ] ],
                99937 => [ 'Macau'                        => [ '0', '1', '20', '59', '600', '999' ] ],
                99938 => [ 'Srpska, Republic of'          => [ '0', '1', '20', '59', '600', '899', '90', '99' ] ],
                99939 => [ 'Guatemala'                    => [ '0', '2', '30', '59', '60', '89', '900', '999' ] ],
                99940 => [ 'Georgia'                      => [ '0', '0', '10', '69', '700', '999' ] ],
                99941 => [ 'Armenia'                      => [ '0', '2', '30', '79', '800', '999' ] ],
                99942 => [ 'Sudan'                        => [ '0', '4', '50', '79', '800', '999' ] ],
                99943 => [ 'Albania'                      => [ '0', '2', '30', '59', '600', '999' ] ],
                99944 => [ 'Ethiopia'                     => [ '0', '4', '50', '79', '800', '999' ] ],
                99945 => [ 'Namibia'                      => [ '0', '4', '50', '89', '900', '979', '98', '99' ] ],
                99946 => [ 'Nepal'                        => [ '0', '2', '30', '59', '600', '999' ] ],
                99947 => [ 'Tajikistan'                   => [ '0', '2', '30', '69', '700', '999' ] ],
                99948 => [ 'Eritrea'                      => [ '0', '4', '50', '79', '800', '999' ] ],
                99949 => [ 'Mauritius'                    => [ '0', '1', '20', '79', '8', '8', '900', '989', '99', '99' ] ],
                99950 => [ 'Cambodia'                     => [ '0', '4', '50', '79', '800', '999' ] ],
                99951 => [ 'Reserved Agency'              => [  ] ],
                99952 => [ 'Mali'                         => [ '0', '4', '50', '79', '800', '999' ] ],
                99953 => [ 'Paraguay'                     => [ '0', '2', '30', '79', '800', '939', '94', '99' ] ],
                99954 => [ 'Bolivia'                      => [ '0', '2', '30', '69', '700', '879', '88', '99' ] ],
                99955 => [ 'Srpska, Republic of'          => [ '0', '1', '20', '59', '600', '799', '80', '99' ] ],
                99956 => [ 'Albania'                      => [ '00', '59', '600', '859', '86', '99' ] ],
                99957 => [ 'Malta'                        => [ '0', '1', '20', '79', '800', '949', '95', '99' ] ],
                99958 => [ 'Bahrain'                      => [ '0', '4', '50', '93', '940', '949', '950', '999' ] ],
                99959 => [ 'Luxembourg'                   => [ '0', '2', '30', '59', '600', '999' ] ],
                99960 => [ 'Malawi'                       => [ '070', '099', '10', '94', '950', '999' ] ],
                99961 => [ 'El Salvador'                  => [ '0', '2', '300', '369', '37', '89', '900', '999' ] ],
                99962 => [ 'Mongolia'                     => [ '0', '4', '50', '79', '800', '999' ] ],
                99963 => [ 'Cambodia'                     => [ '00', '49', '500', '919', '92', '99' ] ],
                99964 => [ 'Nicaragua'                    => [ '0', '1', '20', '79', '800', '999' ] ],
                99965 => [ 'Macau'                        => [ '0', '2', '300', '359', '36', '62', '630', '999' ] ],
                99966 => [ 'Kuwait'                       => [ '0', '2', '30', '69', '700', '799', '80', '96', '970', '999' ] ],
                99967 => [ 'Paraguay'                     => [ '0', '0', '10', '59', '600', '999' ] ],
                99968 => [ 'Botswana'                     => [ '0', '3', '400', '599', '60', '89', '900', '999' ] ],
                99969 => [ 'Oman'                         => [ '0', '4', '50', '79', '800', '949', '95', '99' ] ],
                99970 => [ 'Haiti'                        => [ '0', '4', '50', '89', '900', '999' ] ],
                99971 => [ 'Myanmar'                      => [ '0', '3', '40', '84', '850', '999' ] ],
                99972 => [ 'Faroe Islands'                => [ '0', '4', '50', '89', '900', '999' ] ],
                99973 => [ 'Mongolia'                     => [ '0', '3', '40', '79', '800', '999' ] ],
                99974 => [ 'Bolivia'                      => [ '0', '0', '10', '25', '260', '399', '40', '63', '640', '649', '65', '79', '800', '999' ] ],
                99975 => [ 'Tajikistan'                   => [ '0', '2', '300', '399', '40', '79', '800', '999' ] ],
                99976 => [ 'Srpska, Republic of'          => [ '00', '03', '040', '099', '10', '15', '160', '199', '20', '59', '600', '819', '82', '89', '900', '999' ] ],
                99977 => [ 'Rwanda'                       => [ '0', '1', '40', '69', '700', '799', '975', '999' ] ],
                99978 => [ 'Mongolia'                     => [ '0', '4', '50', '69', '700', '999' ] ],
                99979 => [ 'Honduras'                     => [ '0', '3', '40', '79', '800', '999' ] ],
                99980 => [ 'Bhutan'                       => [ '0', '0', '30', '64', '700', '999' ] ],
                99981 => [ 'Macau'                        => [ '0', '0', '10', '10', '110', '149', '15', '19', '200', '219', '22', '74', '750', '999' ] ],
                99982 => [ 'Benin'                        => [ '0', '2', '50', '71', '885', '999' ] ],
                99983 => [ 'El Salvador'                  => [ '0', '0', '35', '69', '900', '999' ] ],
                99984 => [ 'Brunei Darussalam'            => [ '0', '0', '50', '69', '950', '999' ] ],
                99985 => [ 'Tajikistan'                   => [ '0', '1', '25', '79', '800', '999' ] ],
                99986 => [ 'Myanmar'                      => [ '0', '0', '50', '69', '950', '999' ] ],
                99987 => [ 'Luxembourg'                   => [ '700', '999' ] ],
                99988 => [ 'Sudan'                        => [ '0', '0', '50', '54', '800', '824' ] ],
                99989 => [ 'Paraguay'                     => [ '0', '1', '50', '79', '900', '999' ] ],
                99990 => [ 'Ethiopia'                     => [ '0', '0', '50', '57', '960', '999' ] ],
                99992 => [ 'Oman'                         => [ '0', '1', '50', '64', '950', '999' ] ],
                99993 => [ 'Mauritius'                    => [ '0', '2', '50', '54', '980', '999' ] ],
                99994 => [ 'Haiti'                        => [ '0', '0', '50', '52', '985', '999' ] ],
                99995 => [ 'Seychelles'                   => [ '50', '52', '975', '999' ] ],
        },
        979 => {
                8     => [ 'United States'                => [ '200', '229', '230', '239', '3000', '3199', '3200', '3499', '3500', '8849', '88500', '89999', '90000', '90999', '9850000', '9899999', '9900000', '9929999', '9985000', '9999999' ] ],
                10    => [ 'France'                       => [ '00', '19', '200', '699', '7000', '8999', '90000', '97599', '976000', '999999' ] ],
                11    => [ 'Korea, Republic'              => [ '00', '24', '250', '549', '5500', '8499', '85000', '94999', '950000', '999999' ] ],
                12    => [ 'Italy'                        => [ '200', '299', '5450', '5999', '80000', '84999', '985000', '999999' ] ],
                13    => [ 'Spain'                        => [ '00', '00', '600', '604', '7000', '7349', '87500', '89999', '990000', '999999' ] ],
        },
        );
# END REPLACE
        }
sub _get_data {
# eventually fetch this from the internet
# http://www.isbn-international.org/agency?rmxml=1
        if( defined $ENV{ISBN_RANGE_MESSAGE} and ! -e $ENV{ISBN_RANGE_MESSAGE} ) {
                carp "ISBN_RANGE_MESSAGE is set to [$ENV{ISBN_RANGE_MESSAGE}] but that file does not exist!\nTrying to use the default locations\n";
                }
        my $file = 'RangeMessage.xml';
        no warnings 'uninitialized';
        my @candidates = grep { -e } (
                $ENV{ISBN_RANGE_MESSAGE},              # env
                catfile( dirname( __FILE__ ), $file ), # next to the module
                $file,                                 # current directory
                );
        my $hash;
        $hash = _parse_range_message( $candidates[0] ) if @candidates;
        if( defined $hash ) { return %$hash   }
        else                { _default_data() }
        }
sub _parse_range_message {
        my( $file ) = @_;
        open my $fh, '<:utf8', $file or do {
                carp "Could not open $file to get ISBN range data [$!]\n";
                return
                };
        my $data = do { local $/; <$fh> };
        my $ds;
        my( $serial_number ) = $data =~ m|<MessageSerialNumber>(.*?)</MessageSerialNumber>|;
        my( $date )          = $data =~ m|<MessageDate>(.*?)</MessageDate>|;
        $ds->{'_source'} = $file;
        $ds->{'_serial'} = $serial_number;
        $ds->{'_date'}   = $date;
        my( $registration_groups ) = $data =~ m|<RegistrationGroups>(.*?)</RegistrationGroups>|s;
        my @groups = $registration_groups =~ m|<Group>(.*?)</Group>|sg;
        foreach my $group ( @groups ) {
                my( $isbn_prefix, $prefix ) = $group =~ m|<Prefix>(97[89]-)?([0-9]+?)</Prefix>|;
                $isbn_prefix = $isbn_prefix eq '979-' ? "979" : "978";
                my( $agency ) = $group =~ m|<Agency>(.*?)</Agency>|;
                $agency =~ s/^\s+|\s+$//g;  # 'Croatia     ' ???
                my @rules =
                        map {
                                my( $range ) = m|<Range>(.*?)</Range>|;
                                my( $length ) = m|<Length>(.*?)</Length>|;
                                my( $low, $high ) = split /-/, $range, 2;
                                ( substr($low, 0, $length), substr($high, 0, $length) );
                                }
                        grep {
                                ! m|<Length>0</Length>|
                                }
                                $group =~ m|<Rule>(.*?)</Rule>|sg;
                $ds->{$isbn_prefix}->{$prefix} = [ $agency => \@rules ];
                }
        $ds;
        }
%Business::ISBN::country_data = _get_data();
# I cheat a little bit here. I know that that the max length is
# 5, and that I know that those will start with 999xx. :)
# however, if the data changes I should think about this again.
$Business::ISBN::MAX_COUNTRY_CODE_LENGTH = length(
        ( sort { $a <=> $b } grep { ! /\A_/ } map { keys %$_ } @Business::ISBN::country_data{qw(978 979)} )[-1]
        );
package # Hide from PAUSE
        Business::ISBN;
sub isbn_data_source {
        return $Business::ISBN::country_data{ '_source' } || __FILE__
        }
1;