Hi,
On Mon, Sep 22, 2008 at 12:49 PM, Frederic Demians <[EMAIL PROTECTED]> wrote:
> - my $aisbn = $oldbiblio->{'isbn'};
> - $aisbn =~ /(\d*[X]*)/;
> - $oldbiblio->{amazonisbn} = $1;
> + ($_) = $oldbiblio->{isbn} =~ /([\d-]*[X]*)/;
> + s/-//g;
Why are you assigning to $_? There's no need to do that, since $foo
=~ s/-//g works perfectly well.
Regards,
Galen
--
Galen Charlton
VP, Research & Development, LibLime
[EMAIL PROTECTED]
p: 1-888-564-2457 x709
skype: gmcharlt
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches
