@@ -, +, @@ $ kshell k$ perl misc/cronjobs/delete_items.pl --verbose \ --where "barcode='39999000010831'" --- misc/cronjobs/delete_items.pl | 2 ++ 1 file changed, 2 insertions(+) --- a/misc/cronjobs/delete_items.pl +++ a/misc/cronjobs/delete_items.pl @@ -7,6 +7,8 @@ use C4::Context; use Modern::Perl; use Pod::Usage qw( pod2usage ); +use Koha::Items; + my $dbh = C4::Context->dbh(); my $query = { --