[Koha] Barcode's continued part two

Ere Maijala ere.maijala at helsinki.fi
Sat Feb 20 02:10:47 NZDT 2021


If you have those """ at the beginning and end of the file, remove them. 
So the first line would be:

use Modern::Perl;

--Ere

library at princeofpeaceabbey.org kirjoitti 19.2.2021 klo 15.05:
> 
> Trying to run this:
> 
> """
> 
> use Modern::Perl;
> use Koha::Biblios;
> use Koha::Items;
> 
> my $biblios = Koha::Biblios->search;
> my $branchcode='ppa';
> while ( my $biblio=$biblios->next) {
> 
> 
>          Koha::Item->new(
>            {
>                  biblionumber => $biblio->biblionumber,
>                  homebranch   => $branchcode,
>                  holdingbranch =>$branchcode,
>                  barcode    =>"barcode_".$biblio->biblionumber,
>                  itype =>$biblio->biblioitem->itemtype,
>            }
>          )->store;
> }
> 
> """
> 
> But get this instead:
> 
> String found where operator expected at barcode.pl line 22, near “””
>      (Might be a runaway multi-line “” string starting on line 1)
>          (Missing semicolon on previous line?)
> syntax error at barcode.pl line 22, near “””
> execution of barcode.pl aborted due to compilation errors.
> 
> As you can tell I do not know Perl. So any help will be nice.
> 
> Raphael
> 
> 
> _______________________________________________
> 
> Koha mailing list  http://koha-community.org
> Koha at lists.katipo.co.nz
> Unsubscribe: https://lists.katipo.co.nz/mailman/listinfo/koha

-- 
Ere Maijala
Kansalliskirjasto / The National Library of Finland


More information about the Koha mailing list