OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-Business-ISSN?expand=0&rev=2
This commit is contained in:
parent
aa0e684206
commit
e6904f9765
@ -52,36 +52,6 @@ BuildRequires: perl-macros
|
||||
object-oriented interface and use the c<is_valid_checksum()> function
|
||||
which is exportable on demand.
|
||||
|
||||
If the constructor decides it can't create an object, it returns undef.
|
||||
It may do this if the string passed as the ISSN can't be munged to the
|
||||
internal format.
|
||||
|
||||
* $obj->checksum
|
||||
|
||||
Return the ISSN checksum.
|
||||
|
||||
* $obj->as_string
|
||||
|
||||
Return the ISSN as a string.
|
||||
|
||||
A terminating 'x' is changed to 'X'.
|
||||
|
||||
* $obj->is_valid
|
||||
|
||||
Returns 1 if the checksum is valid.
|
||||
|
||||
Returns 0 if the ISSN does not pass the checksum test. The constructor
|
||||
accepts invalid ISSN's so that they might be fixed with 'fix_checksum'.
|
||||
|
||||
* $obj->fix_checksum
|
||||
|
||||
Replace the eighth character with the checksum the corresponds to the
|
||||
previous seven digits. This does not guarantee that the ISSN corresponds
|
||||
to the product one thinks it does, or that the ISSN corresponds to any
|
||||
product at all. It only produces a string that passes the checksum
|
||||
routine. If the ISSN passed to the constructor was invalid, the error
|
||||
might have been in any of the other nine positions.
|
||||
|
||||
%prep
|
||||
%setup -q -n %{cpan_name}-%{version}
|
||||
find . -type f -print0 | xargs -0 chmod 644
|
||||
|
Loading…
Reference in New Issue
Block a user