If ISBN has 10 numbers only the first 9 numbers are being added to the Edifact-message (PIA+5+
3540556753:IB')
This is caused by wrong positioning of capturing parentheses in a regular expression.
Sponsored-by: Gothenburg University Library
Signed-off-by: Colin Campbell <colin.campbell@ptfs-europe.com>
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
$product_id = $1;
$product_code = 'EN';
}
- elsif ( $isbn_field =~ m/(\d{9})[Xx\d]/ ) {
+ elsif ( $isbn_field =~ m/(\d{9}[Xx\d])/ ) {
$product_id = $1;
$product_code = 'IB';
}