|
Lines 897-903
sub GetVariationsOfISBN {
Link Here
|
| 897 |
|
897 |
|
| 898 |
my @isbns; |
898 |
my @isbns; |
| 899 |
|
899 |
|
| 900 |
push( @isbns, NormalizeISBN({ isbn => $isbn }) ); |
900 |
push( @isbns, NormalizeISBN({ isbn => $isbn, return_invalid => 1 }) ); |
| 901 |
push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-10' }) ); |
901 |
push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-10' }) ); |
| 902 |
push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-13' }) ); |
902 |
push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-13' }) ); |
| 903 |
push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-10', strip_hyphens => 1 }) ); |
903 |
push( @isbns, NormalizeISBN({ isbn => $isbn, format => 'ISBN-10', strip_hyphens => 1 }) ); |
| 904 |
- |
|
|