NAME
Test::ISBN - Check International Standard Book Numbers
SYNOPSIS
use Test::More tests => 1;
use Test::ISBN;
isbn_ok( $isbn );
DESCRIPTION
This is the 2.x version of Test::ISBN and works with Business::ISBN 2.x.
Functions
- isbn_ok( STRING | ISBN )
-
Ok is the STRING is a valid ISBN, in any format that Business::ISBN accepts. This function only checks the checksum. The publisher and country codes might be invalid even though the checksum is valid.
If the first argument is an ISBN object, it checks that object.
- isbn_group_ok( STRING | ISBN, COUNTRY )
-
Ok is the STRING is a valid ISBN and its country code is the same as COUNTRY. If the first argument is an ISBN object, it checks that object.
- isbn_country_ok( STRING | ISBN, COUNTRY )
-
Deprecated. Use isbn_group_ok. This is still exported, though.
For now it warns and redirects to isbn_group_ok.
If the first argument is an ISBN object, it checks that object.
- isbn_publisher_ok( STRING | ISBN, PUBLISHER )
-
Ok is the STRING is a valid ISBN and its publisher code is the same as PUBLISHER.
If the first argument is an ISBN object, it checks that object.
SOURCE AVAILABILITY
This source is in GitHub:
https://github.com/briandfoy/Test-ISBN
AUTHOR
brian d foy, <bdfoy@cpan.org>
COPYRIGHT AND LICENSE
Copyright (c) 2002-2014 brian d foy. All rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.