=encoding UTF-8

=head1 NAME

IP::China - decide whether an internet address is from China

=head1 SYNOPSIS

    use IP::China 'chinese_ip';
    if (chinese_ip ('127.0.0.1')) {
        print '你好';
    }

=head1 FUNCTIONS

=head2 chinese_ip

    my $is_chinese = chinese_ip ('255.255.255.255');

Given an internet protocol string, decide whether it is Chinese or
not. The return value is a true value (-1) if the address is from
China, and a false value (0) if the address is not from China.

=head1 UPDATES

The module will be periodically updated. Allocated addresses for China
may change. The script to build updates is included in the git
repository for this distribution. Please refer to F<Makefile.PL> for
the git repository URL.

The script also includes some errata for the MaxMind list.

=head1 SEE ALSO

L<http://www.lemoda.net/networking/block-china/> contains an article
and some links to further information.

=head1 AUTHOR

Ben Bullock, <bkb@cpan.org>

=head1 COPYRIGHT

This product includes GeoLite data created by MaxMind, available from
http://www.maxmind.com. The GeoLite databases are distributed under
the Creative Commons Attribution-ShareAlike 3.0 Unported License. All
of the GeoLite data is in the file F<block-china-data.c> of the
distribution.

All other files are copyright (C) 2013 Ben Bullock. You can use, copy,
modify and redistribute these files under the Perl Artistic Licence or
the GNU General Public Licence.