Bug 25873: Ignore malformed data for Elasticsearch integer fields
[koha.git] / misc / cronjobs / social_data / get_report_social_data.pl
blobc5e13aaf1b5a53c8cb086efa391db8d55909d1c1
1 #!/usr/bin/perl
3 use Modern::Perl;
5 use Koha::Script -cron;
6 use C4::SocialData;
8 my $results = C4::SocialData::get_report;
10 say "==== Social Data report ====";
11 say "Matched : (" . scalar( @{ $results->{with} } ) . ")";
12 say "biblionumber = $_->{biblionumber},\toriginal = $_->{original},\tisbn = $_->{isbn}" for @{ $results->{with} };
14 say "No Match : (" . scalar( @{ $results->{without} } ) . ")";
15 say "biblionumber = $_->{biblionumber},\toriginal = $_->{original},\tisbn = $_->{isbn}" for @{ $results->{without} };
17 say "Without ISBN : (" . scalar( @{ $results->{no_isbn} } ) . ")";
18 say "biblionumber = $_->{biblionumber}" for @{ $results->{no_isbn} };