} else {
verbose sprintf "Item '%s' (Barcode: '%s', Title: '%s') not deleted: %s",
$item->{itemnumber},
$item_object_->barcode,
$item_object->barcode,
$item_object->biblio->title,
@{$safe_to_delete->messages}[0]->message;
}
-