I removed those """ at the beginning and end then got this message: Cant locate koha/Biblios.pm in @INC Quoting Ere Maijala <ere.maijala@helsinki.fi>:
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@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@lists.katipo.co.nz Unsubscribe: https://lists.katipo.co.nz/mailman/listinfo/koha
-- Ere Maijala Kansalliskirjasto / The National Library of Finland _______________________________________________
Koha mailing list http://koha-community.org Koha@lists.katipo.co.nz Unsubscribe: https://lists.katipo.co.nz/mailman/listinfo/koha