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
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
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
Don't include the quotes, it was to delimit the code. Le ven. 19 févr. 2021 à 14:05, <library@princeofpeaceabbey.org> a écrit :
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
Removed the quotes but still got the same error message. how to you get koha-shell ppa to work? Quoting Jonathan Druart <jonathan.druart@bugs.koha-community.org>:
Don't include the quotes, it was to delimit the code.
Le ven. 19 févr. 2021 à 14:05, <library@princeofpeaceabbey.org> a écrit :
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
participants (3)
-
Ere Maijala -
Jonathan Druart -
library＠princeofpeaceabbey.org