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